if ($data =~ /1234\d{2}\abcd/) { print "Fetch successful\n"; } else { print "Not found\n"; } [download]
In reply to Fetching data by Anonymous Monk