Select Code to Download

[05:32][nick:~/dev/perl_dev/test/monks]$ cat 1133944.pl
#!/usr/bin/env perl     
...
  print "\n";
}

[05:31][nick:~/dev/perl_dev/test/monks]$ perl 1133944.pl
 Enter dimension : 3.14159
...
5  6  7  8  
9  10  11  12  
13  14  15  16

[05:32][nick:~/dev/perl_dev/test/monks]$ cat 1133944-2.pl
#!/usr/bin/env perl
...
  }
  print "\n";
}

[05:33][nick:~/dev/perl_dev/test/monks]$ perl 1133944-2.pl
 Enter dimension : 3.14159
...
1  2  3  
4  5  6  
7  8  9