Help for this page

Select Code to Download


  1. or download this
    
    if($es =~ /\b$    0.00 \b/)
    {print "
    
  2. or download this
    sub searchcustomer {
    open (HANDLE, $datafilename) or &diedatafilenotfound;
    ...
     if ($found == 0) {print "Sorry, no match was found<br>\n";}
     print "<a href=$ENV{REQUEST_URI}>Click Here</a> to search again