use Path::Class; print join "#", dir("abc/def/ghi")->components; [download]
In reply to Re: Breaking file path into segments by holli in thread Breaking file path into segments by cherio