Hi

Its has nothing to do with bless though, strict is protecting you from ambiguous code

$ splain < 2
perl -c packtest.pl
Bareword "PENDULUM" not allowed while "strict subs" in use at packates
+t.pl line
        9 (#1)
    (F) With "strict subs" in use, a bareword is only allowed as a
    subroutine identifier, in curly brackets or to the left of the "=>
+"
    symbol.  Perhaps you need to predeclare a subroutine?

packtest.pl had compilation errors (#2)
    (F) The final summary message when a perl -c fails.
[download]

ambiguous code (bareword PENDULUM)

$ perl -le" print bless {}, PENDULUM; "
PENDULUM=HASH(0x3f9adc)

$ perl -le" sub PENDULUM { 666 } print bless {}, PENDULUM;  "
666=HASH(0x3f9adc)
[download]

See Ill-Advised Uses of Barewords in modern_perl_2016_a4.pdf page 167