sub with_proto ()  { my $lex }

##</code><code>##

>c:\progs\perl560\bin\perl test.pl
Use of uninitialized value at test.pl line 12.
Constant subroutine with_proto redefined at test.pl line 12.
Subroutine with_proto redefined at test.pl line 16.
Subroutine with_proto redefined at test.pl line 20.
Subroutine with_proto redefined at test.pl line 25.
Subroutine with_proto redefined at test.pl line 29.
Subroutine with_proto redefined at test.pl line 36.
Subroutine with_proto redefined at test.pl line 41.
Subroutine with_proto redefined at test.pl line 45.
Subroutine with_proto redefined at test.pl line 55.
Constant subroutine with_proto redefined at test.pl line 58.

>c:\progs\perl561\bin\perl test.pl
Use of uninitialized value at test.pl line 12.
Constant subroutine with_proto redefined at test.pl line 12.
Subroutine with_proto redefined at test.pl line 16.
Subroutine with_proto redefined at test.pl line 20.
Subroutine with_proto redefined at test.pl line 25.
Subroutine with_proto redefined at test.pl line 29.
Subroutine with_proto redefined at test.pl line 36.
Subroutine with_proto redefined at test.pl line 41.
Subroutine with_proto redefined at test.pl line 45.
Subroutine with_proto redefined at test.pl line 55.
Constant subroutine with_proto redefined at test.pl line 58.

>c:\progs\perl580\bin\perl test.pl
Subroutine with_proto redefined at test.pl line 12.
Subroutine with_proto redefined at test.pl line 16.
Subroutine with_proto redefined at test.pl line 20.
Subroutine with_proto redefined at test.pl line 25.
Subroutine with_proto redefined at test.pl line 29.
Subroutine with_proto redefined at test.pl line 36.
Subroutine with_proto redefined at test.pl line 41.
Subroutine with_proto redefined at test.pl line 45.
Subroutine with_proto redefined at test.pl line 55.
Constant subroutine with_proto redefined at test.pl line 58.