system("perl mycode.pl -email 'test_string' -type $sometype  -unit $some_unit");

##</code><code>##

my $receipt_email = 'myemail@gmail.com"
system("perl mycode.pl -email $receipt_email -type $sometype  -unit $some_unit");