Select Code to Download

my $myvariable;
my $this-variable;
$this-variable = 1 if $myvariable =~ /blah/;

print "HEY!\n" if $this-variable;
print "NO!\n" if !$this-variable;