Nice post! Nothing new to me, but nice to read and easy to understand...

But I'm not sure about the:

 Other thing, if you want to process the lines, don't cat all the file
+ inside a @array, to after this process them! Is better to read and p
+rocess, this is faster and use less memory:

  open (FLHD,"$0") ;
  while (my $line = <FLHD>) {
    my ($x , $y , $z) = split("::" , $line) ;
  }
[download]

Part, I'll have to benchmark this again if I find some time. I think I did this before and my result was that if you have lots of things to modify an array/hash is better...

giant