Searched defs:sub5 (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/comp/
H A Dredef.t46 sub sub5 () { 1 } subroutine
47 sub sub5 ($) { 2 } subroutine
49 ok 9, $warn =~ s/$NEWPROTO \Qsub main::sub5 () vs ($)\E[^\n]+\n//s;
50 ok 10, $warn =~ s/Constant subroutine sub5 redefined[^\n]+\n//s;

Completed in 14 milliseconds