use warnings;
use strict;

open my $f, '>out.txt' or die 'ouch!';
$_=' eeee';
my $e='e';

#supposed to be a pattern match, but interpreted as division.
print $f / $e/ ? 'yes' : 'no';