Re^3: Orbital starters

[soonix]

They are different. You can run the following example.

The part below the __DATA__ shows the expected output: $VAR1 is $_, $VAR2 is @_
(the \ in the Dumper statement is to have @_ formatted as array rather than individual scalars).

Before you go hunting for that odd Perl version: it specifies the minimum version. If your Perl is even older, you can change use 5.011 to use strict and say by print.

#!/usr/bin/env perl
use 5.011; # implies strict + feature 'say'
use warnings;
use Data::Dumper;

for (1 .. 2) {
    say "in loop:";
    say Dumper $_;
    test(3, 4);
}

sub test {
    say "in sub:";
    #          $VAR1  $VAR2
    say Dumper $_,    \@_;
}

__DATA__

in loop:
$VAR1 = 1;

in sub:
$VAR1 = 1;
$VAR2 = [
          3,
          4
        ];

in loop:
$VAR1 = 2;

in sub:
$VAR1 = 2;
$VAR2 = [
          3,
          4
        ];
 ];