my $man = "yes";
print "I can change, I guess" if $man = "yes";

##</code><code>##

my $tool = "duct tape";
my $job = "any";
if ($job = "any"){
use $tool;
}