#!/usr/local/bin/perl
use strict;

$::e && $main::f && print "wabbit";