Select Code to Download

if ( lc($foo) eq "test" ) { print "It was test!\n"; }

if ( $foo =~ /^test$/i) { print "It was test!\n"; }