Language Basics Perl

sub addem
{
    ($value1, $value2) = @_;
    $value1 + $value2;
}
@_ = (2, 2);
$value = &addem;
print "2 + 2 = $value\n";