Select Code to Download

package WTF;

...

    bless \( my $scalar ), ref $self || $self;
}

use strict;
use warnings;
...
    WTF->import(qw/some/);
    WTF->import(qw/more/);
}

C:\WINDOWS\system32\cmd.exe /c perl WTF.pl
Created type: some
...
BEGIN failed--compilation aborted at WTF.pl line 9, <DATA> line 1.
shell returned 255
Hit any key to close this window...

!perl WTF.pl
Created type: some
Problem with subclass: WTF::more - cannot new() at WTF.pl line 8
BEGIN failed--compilation aborted at WTF.pl line 9, <DATA> line 1.