package Cool;
use strict;
use warnings;
no warnings 'redefine';

sub new { return bless {}, $_[0]; }
sub testit { return 'Change me and see what happens'; }
sub soft_boot { do 'magic'; }

'This statement is false';