#!/usr/bin/perl

$roses{r} = 'red';
$violets{r} = 'blue';
 if( ! -e '/usr/bin/perl'){
 print "Man I'm screwed\n";
 }