From: Jan P. <jp...@us...> - 2006-08-31 20:28:31
|
Update of /cvsroot/e-p-i-c/org.epic.perleditor-test/workspace/EPICTest In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv4484/workspace/EPICTest Added Files: Tag: stable test_OpenSub2.pl Log Message: Added a test case for Open SUB Declaration using 'require' traversal. --- NEW FILE: test_OpenSub2.pl --- #!/usr/bin/perl use warnings; use strict; require "lib/TestOpenSub2.pm"; foreach my $x (@INC) { print "$x\n"; } =comment sub foo { } #sub some_sub { print "bla"; } sub _baz_zz($$) { print "foo"; } sub brzdek # tralaa { foo(); } =cut other_sub(&some_sub()); |