declaration variables

sub make_section

 print("sunix_package_declaration,get_section,@lines\n");
	    "\t".'my $get					= L_SU_global_constants->new();'."\n\n".

sub get_section

print("sunix_package_declaration,get_section,@lines\n");