On Thu, 11 Aug 2011 16:17:51 -0700, <siegfr...@heintze.com> wrote:
> This works! Is there a way to do it with less typing? How can I do it
> without creating a temporary variable "@p"?

rename($_, sprintf("./%s.txt", (split '/')[-1]));


-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to