Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    }
    
    print "No matches found\n" unless $match;
    
  2. or download this
    >perl findinfile.pl run.c "int\s+main\s*\("
    
  3. or download this
    int
    main(int argc, char** argv)
    
  4. or download this
    ...
    my $text;
    ...
    }
    
    print "No matches found\n" unless $match;