Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid

Re^3: Range Operator in If Statement

by mmartin (Monk)
on Jan 05, 2012 at 19:23 UTC ( #946461=note: print w/replies, xml ) Need Help??

in reply to Re^2: Range Operator in If Statement
in thread Range Operator in If Statement

Not_a_Number, thanks for the reply...

Cool stuff... Could you explain a little how that works exactly? I'm still relatively new to Perl.


Replies are listed 'Best First'.
Re^4: Range Operator in If Statement
by Not_a_Number (Prior) on Jan 06, 2012 at 11:15 UTC
    Could you explain...

    Let me try. First,

    [ 'A' .. 'F' ]

    is a reference to an anonymous arrray (see references quick reference). To access, for example, the second element of this array, the syntax is:

    [ 'A' .. 'F' ]->[1]

    (You could also do ${ [ 'A' .. 'F' ] }[1] but I find the first form cleaner.)

    Then, instead of hard-coding the array index, my snippet calculates it in the fashion indicated in LanX's post above. The only difference is that I've removed int() since perl happily does this part of the job for me when I use a floating point number as an array index.

    To clarify, the following code, using a named array and an intermediate variable ($index), does the same thing:

    my @array = ( 'A' .. 'F' ); my $ref_number = 42; # or whatever my $index = ( $ref_number - 1 ) / 8; my $bundle = $array[ $index ]; print $bundle;

    hth, dave

      Hey thanks for the explaination...

      I'll give it a try and see how it goes.

      Thanks Again,

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://946461]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (6)
As of 2018-06-24 23:37 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.