in reply to Perl Assignments Needed

Very easy assignment: $a = 1;