find * -type d | perl -F/ -ane’print 1..1?$_:”| “x@F.$/.”| “x$#F.”+-$F[-1]“‘
找了好久….:P
Tags: perl shell script
This entry was posted on Wednesday, May 28th, 2008 at 1:49 am and is filed under computer. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.
5kv7f9kehkegi1d1
新加坡出差心得
Name (required)
Mail (will not be published) (required)
Website
Notify me of follow-up comments by email.
Notify me of new posts by email.
5kv7f9kehkegi1d1
新加坡出差心得