Perl script to create a general deegree workspace