Muahahaha
[pudge@bourque MacPerl]$ perl -Iblib/arch -Iblib/lib -MMacPerl -le 'print join "\n", MacPerl::Volumes()'
FF9C00000001:Orr
FF9B0000000 1:Bourque
FF9A00000001:Bird
[pudge@bourque MacPerl]$ perl -Iblib/arch -Iblib/lib -MMacPerl -le 'print join "\n", map { MacPerl::MakePath($_) } MacPerl::Volumes()'
/
/Volumes/Bourque
/Volumes /Bird
"It is the common fate of the indolent to see their rights become a prey to the active. The condition upon which God hath given liberty to man is eternal vigilance; which condition if he break, servitude is at once the consequence of his crime and the punishment of his guilt."
Leave a comment