[VPM] Oh...
abez
abez at abez.ca
Wed Aug 18 01:11:49 CDT 2004
brian d foy gave this example in the Perl Review v.1.0
instead of
my $pie = "";
if (..) { $pie = 1; }
elsif (..) { $pie = 2; }
elsif (..) { $pie = 4; }
elsif (..) { $pie = 8; }
You could do...
my $pie = do {
if (..) { 1 }
elsif (..) { 2 }
elsif (..) { 4 }
elsif (..) { 8 }
}
saves typing..
--
abez ------------------------------------------
http://www.abez.ca/ Abram Hindle (abez at abez.ca)
------------------------------------------ abez
More information about the Victoria-pm
mailing list