Acme::BadExample 

• By Adam Kennedy

#!/usr/bin/perl

use strict;
use warnings;

# Do something clever here

use Acme::BadExample;

print "Adam owes me a vertical metre of beer\n";