Hi and thanks for the great tutorial...one small note use Data::Dumper; print Dumper \@array; should be... use Data::Dumper; print Dumper \@shapes; Thanks again