if ($tmp eq 'F') { (); }elsif ...