Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: Comment Stripper script for unix

by Zaxo (Archbishop)
on Jun 14, 2004 at 02:49 UTC ( #366391=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    -if ( $us eq "ee" ) { $comm = ';'; } else { $comm = '#'; }
    +if ( $us eq "ee" ) { $comm = ';'; } else { $comm = '
    
  2. or download this
    -   die(&pwarn($comm)) if $topline =~ /\#\!.*perl/i ;
    +   die(&pwarn($comm)) if $topline =~ /\
    
  3. or download this
    -     if ( $topline =~ /(\s+)\#\!/ ) {
    +     if ( $topline =~ /(\s+)\
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (7)
As of 2014-07-25 07:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (169 votes), past polls