Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: Possible to have a module act as a standalone??

by BrowserUk (Pope)
on Mar 18, 2003 at 22:49 UTC ( #244175=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    E:\Perl\site\lib\My>type Filter.pm
    #! perl -slw
    ...
    
    print '=' x 20, 'Timing of regexs in ', $0, '=' x 20;
    print My::Filter::report();
    
  2. or download this
    E:\Perl\site\lib\My>perl Filter.pm
    Subroutine report redefined at E:/Perl/site/lib/My/Filter.pm line 16.
    ...
    5000 trials of (\G(?:.{3})+?)(?<=...)(.)(.)
     (640.000ms total), 128us/trial
    
  3. or download this
    C:\test>perl -MMy::Filter -e"$s='abc'; print 'ok' if $s =~ m[b]; print
    + My::Filter::report();"
    ok1 trial of b
     (0s total)
    
    C:\test>
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://244175]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (8)
As of 2019-07-19 12:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?