変数をいくつかのサブに渡すと、常に空になります。どうしてこれなの ?
sub Main {
my $myVariable = "Test string";
firstSub($myVariable);
}
sub firstSub {
my($myVariable) = @_;
my @array = `some command`;
secondSub(@array, $myVariable);
}
sub secondSub {
my(@array, $myVariable) = @_;
print $myVariable;
}
エコーはundefになります。