http://qs321.pair.com?node_id=1090163

zeltus has asked for the wisdom of the Perl Monks concerning the following question:

Looking thru' some legacy code I have to support, I have come across entries like...

$variable = bless( do{\(my $x = 49)}, 'Rates::Notification

I am unclear what the 'do' is for

I have a vague memory of tutorials involving inside-out programming, blessing of scalars and such-like which I think have a bearing on this, but my memory is shot and I can't remember anything else.

Can a Monk put me out of my misery and explain why this was used and why it should (or shouldn't) be used today?

thanks!