Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: fall through switch/case in perl

by Aristotle (Chancellor)
on Sep 06, 2004 at 23:45 UTC ( [id://388883]=note: print w/replies, xml ) Need Help??


in reply to fall through switch/case in perl

for ( $var ) { $_ == 10 and print "a"; $_ == 9 and print "b"; $_ == 8 and print "c"; $_ == 7 and print "d"; $_ == 6 and print "e"; $_ == 5 and print "f"; $_ == 4 and print "g"; $_ == 3 and print "h"; $_ == 2 and print "i"; $_ == 1 and print "j"; }

There are about ten million other ways to say the same, of course.

Makeshifts last the longest.

Replies are listed 'Best First'.
Re^2: fall through switch/case in perl
by shenme (Priest) on Sep 07, 2004 at 00:10 UTC
    You missed his note about "fall through" ala C.

    In his example, a value of '5' would produce "fghij". A value of '2' would produce "ij". Velaki's code recognizes this better.

    But I wonder if he might ever have var set to zero? (No output!)

      No, I did not miss that note. Did you run the code?

      Makeshifts last the longest.

        The comment that your code is wrong and does not fall through is accurate. I did run the code, not that it necessary. Set $var to 10 it prints only 'a' and does not fall through the b c d cases as with a C fall through.

        cheers

        tachyon

Re^2: fall through switch/case in perl
by PerlingTheUK (Hermit) on Sep 07, 2004 at 16:05 UTC
    Mhm wonder what happens if $var is 20000000000 or -1.

    PerlingTheUK

      Nothing.

      Makeshifts last the longest.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others meditating upon the Monastery: (4)
As of 2024-04-25 05:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found