#!/usr/bin/perl

use warnings;

my $sum=0;

for my $x(@ARGV)
{
	$sum+=$x;
}

print "$sum\n";