Select Code to Download

  DB<106> @x= map {int rand 10 } 1..10
 => (5, 5, 7, 6, 1, 5, 3, 5, 7, 7)
...

  DB<108> [ sort @x; ]
syntax error at (eval 59)[multi_perl5db.pl:644] line 2, at EOF

lanx@nc10-ubuntu:~$ perl -c
sub my_filter {
...
   ];
}
- syntax OK