Select Code to Download

use CGI;
my $q = CGI->new( { one => 1, two => 2, three => 3 } );
...
__DATA__
Args( 1, 2, 3, 4_IS_NULL )
Args( 1, 2, 3, 4 )