Help for this page

Select Code to Download

Select or download this

# SWITCH: for(thing to check) {
#     /regexp/ && do { condition 1; last SWITCH; };
#     (condition) && do { condition 2; last SWITCH; };
#     do { catch all };
# }

Select or download this

$ref = \@array; # or,
$ref = \%hash; # or,
$ref = \$scalar;
...
        die "don't know what to do with ". $_;
    };
}