DB<1> sub test {
Missing right curly or square bracket at (eval 9)[/usr/share/perl/5.8/perl5db.pl:619] line 4, at end of line
syntax error at (eval 9)[/usr/share/perl/5.8/perl5db.pl:619] line 4, at EOF

DB<2>