Select Code to Download

http://www.perl.com/pub/2003/06/06/regexps.html

$ cat p2.pl
#!/opt/perl5.16/bin/perl
...
print "----------\n";
print $1 . "\n";
print "----------\n";

$ ./p2.pl
----------
...
(we go( in( and in (&stop)(awhile) ( further ))) but still (here) )
----------
$

$ cat p3.pl 
#!/opt/perl5.16/bin/perl
...
 
----------
$