http://www.perlmonks.org?node_id=1036442


in reply to Re^2: RFC: Simulating Python's @decorators in Perl with Attributes
in thread RFC: Simulating Python's @decorators in Perl with Attributes

Sorry, the verbose syntax example I gave was wrong. It would actually be like this:
#!/usr/bin/perl use strict; use warnings; package Foo::Sorted; use Attribute::Handlers; sub Sorted :ATTR { print "all sorted" } package main; my Foo::Sorted $tst :Sorted;