foreach(@ARGV)
{
 if($_ eq "complete")
 {
  $change = "cmplt";
 } 
 else if($_ eq "srces")               #syntax error 1
 {
  $change = "src";
 }
 else                                 #syntax error 2
 {
  push($printof{$change},$_);
 }
}