123456789 use Attribute::Handlers autotie => { Dir => 'Tie::Dir qw(DIR_UNLINK)' };my %dot : Dir('.', DIR_UNLINK);print join "\n", keys %dot;delete $dot{killme};print join "\n", keys %dot;
use
Attribute::Handlers
autotie
=> {
Dir
=>
'Tie::Dir qw(DIR_UNLINK)'
};
my
%dot
: Dir(
'.'
, DIR_UNLINK);
print
join
"\n"
,
keys
;
delete
$dot
{killme};