Select Code to Download

#!/usr/bin/perl -T
use strict;
...
print Dumper($color);
exit;
print "Your chosen color is $color.\n";

# ./color.cgi color=red
Content-type: text/plain

$VAR1 = 'red';