[MacPerl] Hoaky MacPerl Regular Expression Question

[Chilton Webb <chilton@tca.net>]

I've been knocking this one around in my miniature brain for about a 
month now, so I guess I'm not going to figure it out on my own.

I have a list of files, with this structure:

------
Macintosh HD:myFiles:a.txt
Macintosh HD:myFiles:b.txt
Macintosh HD:myFiles:more:a.txt
Macintosh HD:myFiles:more:b.txt
Macintosh HD:myFiles:more:yetmore:a.txt
Macintosh HD:myFiles:more:yetmore:b.txt
Macintosh HD:yurFiles:a.txt
Macintosh HD:yurFiles:b.txt
------

And I want them in this format:

------
Macintosh HD

  myFiles
    a.txt
    b.txt

    more
      a.txt
      b.txt

      yetmore
        a.txt
        b.txt

  yurFiles
    a.txt
    b.txt

------

Any suggestions?

-Chilton

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org