Now I wonder why this was never fixed....

I don't know :)

This got in http://perl5.git.perl.org/perl.git/history/HEAD:/lib/strict.pm

# Verify that we're called correctly so that strictures will work.
unless ( __FILE__ =~ /(^|[\/\\])\Q${\__PACKAGE__}\E\.pmc?$/ ) {
    # Can't use Carp, since Carp uses us!
    my (undef, $f, $l) = caller;
    die("Incorrect use of pragma '${\__PACKAGE__}' at $f line $l.\n");
}


$ perl -MStRiCt -e 1
Incorrect use of pragma 'strict' at -e line 0.
Compilation failed in require.
BEGIN failed--compilation aborted.
[download]

Same for warnings

# Verify that we're called correctly so that warnings will work.
# see also strict.pm.
unless ( __FILE__ =~ /(^|[\/\\])\Q${\__PACKAGE__}\E\.pmc?$/ ) {
    my (undef, $f, $l) = caller;
    die("Incorrect use of pragma '${\__PACKAGE__}' at $f line $l.\n");
}
$ perl -MWaRnInGs -e 1
Incorrect use of pragma 'warnings' at -e line 0.
Compilation failed in require.
BEGIN failed--compilation aborted.
[download]

The accompanying thread dated April 16, 2007 The Strict trap hints at some reasons, like it would break existing code, etc