my $calar   = ...; # scalar context
my @rray    = ...; # list context
my ($calar) = ...; # list context
my @rray    = scalar ...; # scalar context