Help for this page

Select Code to Download


  1. or download this
    # note that a simple pure perl version using 3arg open and
    # e.g. $count=$contents=~s/$argument/$&/g will have 
    ...
    
    # upd: either -H OR /dev/null, sigh. a very telling misread of mine
    $results=`grep -c -H "\$argument" "\$file"`; # /dev/null`; # note \$ i
    +nstead of \"
    
  2. or download this
    #!/usr/bin/perl -w
    #this file is for grepping within vdx files, and outputs the following
    +:
    ...
           print "$results:$argument\n";
        }
    }