if (/^PER\s*$/)
      ...
      elsif (/^EMP\s*$/)
      ...