Help for this page

Select Code to Download


  1. or download this
        print APPEND $line2
         if $line2 =~ /$line1/;
  2. or download this
        $line1 = '1.2.3.4';
    $line2 = '111.2.3.44';
    print "match\n" if $line2 =~ /$line1/;
  3. or download this
        $line1 = '1.2.3.4';
    $line2 = '11223344';
    print "match\n" if $line2 =~ /$line1/;