Select Code to Download

#!env perl
use strict;
...
for my $other_variable_also_named_S4 (1 .. 2) {
    print "A: <$other_variable_also_named_S4> <", X(), ">\n";
}