#!/usr/bin/perl -s if ($foo eq 'bar'){ print "true\n" }