removed undefined variable
first pass at perl lib
perl lib: create empty nodes
Merge pull request #73 from teharrison/master

shock perl lib added