Help for this page

Select Code to Download


  1. or download this
    c:\> perl -n -e "print if /^abcde.+PARTNAME$/" c:\somefile.txt>k:\1\so
+mefile.txt
  2. or download this
    c:\> perl -n -e "print if /^abcde/ && /PARTNAME$/" c:\somefile.txt>k:\
+1\somefile.txt
  3. or download this
    substr()

c:\> perl -n -e "print if substr($_,0,5) eq q(abcde) && substr($_,-9) 
+eq qq(PARTNAME\n)" c:\somefile.txt>k:\1\somefile.txt