### test code #X# no arguments if(000){ print NewSkeletonDoc::FillSkeletonTemplate(); }; #X# #X# arguments with blank values if(000){ print NewSkeletonDoc::FillSkeletonTemplate({basename=>' '}); }; #X# #X# arguments with test values if(000){ print NewSkeletonDoc::FillSkeletonTemplate( { basename=>'foo_file', desc=>'this is the foo desc', sbty=>'perl-based skeleton template' } ); }; #X# ### init package package NewSkeletonDoc; ### ... rest of code goes here