use strict;

print "Insert Employee Number: "; # Prompts the user
my $empNum = 1;
while ($empNum)
{
   $empNum = <>; # Gets input from STDIN
   print "The employee number you enetered was: $empNum\n";
   print "Insert Employee Number: "; # Prompts the user
}