Select Code to Download

#!/usr/bin/perl
use warnings;
...
#    print variables "$_=$_\n";
#}
close variables;

pizza_margherita=pizza_margherita
$cheese=$cheese
$tomato=$tomato
$mass=$mass
$USERNAME=$USERNAME

pizza_margherita=pizza_margherita
$cheese=cabrales
$tomato=orlando
$mass=secret
$USERNAME=windowsuser