my @parameters = @_;

##</code><code>##

    my ($x, $y) = @_;

##</code><code>##

    my $x = shift;