Select Code to Download

first_sub('Testing, testing',' one, two, three');
...
    print $variable.$variable2;
}

use strict;
use vars qw/$var1 $var2/;