my ($t) = @_;

##</code><code>##

my $t = shift;

##</code><code>##

print "t = $t\n";

##</code><code>##

my $t = @_;

##</code><code>##

my $t = scalar @_;