Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re^2: How to create loop in perl dynamically

by adithi (Initiate)
on Sep 26, 2012 at 14:11 UTC ( #995779=note: print w/ replies, xml ) Need Help??


in reply to Re: How to create loop in perl dynamically
in thread How to create loop in perl dynamically

Will try range operator. Thank u.


Comment on Re^2: How to create loop in perl dynamically
Re^3: How to create loop in perl dynamically
by adithi (Initiate) on Sep 26, 2012 at 14:20 UTC
    I tried this, $index is input
    foreach(1..$index)
    {
    }
    Here if $index =2, foreach gets created 2 times, But how do i code inside this and control loop parameters.
    Please suggest

      By default the loop variable is held in $_ but you can assign to a variable if you wish. It is not a good idea to alter loop variables inside the loop, that leads to all sorts of grief.

      $ perl -Mstrict -Mwarnings -E ' > foreach my $outer ( 1 .. 3 ) > { > foreach my $inner ( 7 .. 9 ) > { > say qq{$outer x $inner = @{ [ $outer * $inner ] }}; > } > }' 1 x 7 = 7 1 x 8 = 8 1 x 9 = 9 2 x 7 = 14 2 x 8 = 16 2 x 9 = 18 3 x 7 = 21 3 x 8 = 24 3 x 9 = 27 $

      I hope this is helpful.

      Cheers,

      JohnGG

      foreach my $foo (1 .. $x) ... creates a local variable named $foo which contains the current index for this particular loop.   Never use $_ for this purpose, usually.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://995779]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (6)
As of 2014-09-01 23:27 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (18 votes), past polls