open(last_assignee, '<', "last_assignee.txt") or die "Unable to open last_assignee.txt for READ\n"; # Get the last assigned value and store it to a variable while () { print $_; chop; if ($_ ne "") { $assignee_last = $_; } }