use strict;
use warnings;
one(1,2,3,4);
sub two {
    print "Elements : \n @_ \n";
}
sub one {
    two shift, shift;
}