Select Code to Download

#!/tool/pandora64/bin/perl -w -I ./

...
print(join("\n", @INC));

1;

package w;
# in ./A
...
    print("w ending now.\n");
}
1;