in reply to get the "last part" of a Path::Class object
m#([^/]+)/*$# # and use $1 now
Perl 6 in German