Unix/PERL: Complete the subroutine in the following script so that it returns a sum of all numbers passed as arguments. Your solution must handle any number of inputs. In the text field provided, you may enter the completed subroutine; you do not need to include the rest of the sample script.

#!/usr/bin/perl

sub addAll {

my $TOTAL=0;

# Your code goes here!

return $TOTAL;

}

print addAll(1, 2, 3, 4, 5) . " ";

print addAll(5, 10, 0, 1) . " ";

print addAll(1,1) . " ";

Sample Output:

$ ./myScript.pl

15

16

2