Mega Code Archive

 

Categories / Perl / Language Basics

 

Assign value to @_

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