Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
    if (index($_, '9432') != -1) { print "match found\n"; }
    else { print "match failed\n"; }
}
  2. or download this
    open (CINGULAR, "c:/documents and Settings/david price/my documents/ci
+ngular.txt") || die "cannot open: $!";

...
# while ($count++ < 100) {

}