Select Code to Download

#!/usr/bin/perl
$name = 'turd';
$blah = 'sample';

#!/usr/bin/perl -w

...

use vars qw($name $blah)
require './turd.pl';