Perl script to create a deegree workspace