Select Code to Download

        geometry IndexedFaceSet {
            coord
...
                     267.726 -167.91 -521.09,
                     264.468 -167.739 -523.493]
                  }

while ( $array =~ /\[         #open sq bracket
...
{
    print "Grr: get inside this loop";
}