#!/usr/local/Hughes/bin/lite

$in=open("./all.tables", "<");
if ($in<0) { 
   echo("Error: $ERRMSG\n");
   fatal();
   }

$out=0;
while($out==0) {
   $line=readln($in);
   $rr=sub($line, "$user", $argv[1]);
   echo("$rr");
   if ($line=="") { 
      $out=1;
      }
}

close($in);


