Select Code to Download

SLNO FirstName LastName Desgination
-----------------------------------------------------
...
5 Bhushan Bhatkar Quality
6 Dinesh Yadav Support
------------------------------------------------------

#!/perl/bin/perl
$fname = "Designations.txt";
...
print "Enter First Name or Last Name: \n \n";
$name = <STDIN>;
print "Entered name is : $name \n";

#!/perl/bin/perl
use strict;
...
print "Enter First Name or Last Name: \n \n";
my $name = <STDIN>;
print "Entered name is : $name \n";

#!/perl/bin/perl
use strict;
...
chomp(my $name = <STDIN>);
print "Entered name is : $name \n";
print "Designation is : $designation{$name}\n";