Говнохак

Есть кодеры в русских селеньях…

Из наследия женщины-программиста (осторожно, эссенция!):

use strict;
use warnings;

package Foo::Bar;
__PACKAGE__->{attr} = "Blargh!";
print __PACKAGE__->{attr}, "\n";

Это ведь настоящий сферический пиздец в вакууме, господа. Нарочно ведь такое не придумаешь.

Спойлер:

$ perl -MO=Deparse blargh
package Foo::Bar;
use warnings;
use strict 'refs';
$Foo::Bar{'attr'} = 'Blargh!';
print $Foo::Bar{'attr'}, "\n";
blargh syntax OK