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.