Help for this page

Select Code to Download


  1. or download this
     #!/usr/bin/perl
use strict;
use warnings;
...

close IN;
close OUT;
  2. or download this
    
0 5 5
...
2 5 2
5 5 5
5 5 6
  3. or download this
    mac95406:perl a7c$ ./perl
Use of uninitialized value in join or string at
...
    concatenation (.) operator, even though there is no . in
    your program.
  4. or download this
     
sub as_string { "{" . join(", ", @{$_[0]}). "}" }