News for hackers. Stuff that matters.
Re:Useful Perl one-liners (2013) by a_gopher on Wednesday November 30, 2016 @06:20PM (#13075600)
fair. not quite so pretty now...

  perl -E 'for(@ARGV){say,unlink for<$_/whatever*>;push@ARGV,($_)x(-d^-l)for<$_/*>}' .

There are no comments on this comment yet.