#!/hdd/opt/perl/bin/perl -d