Hab gerade den ersten Codeschnippsel ausprobiert. Also einfach komplett übernommen,
#!/usr/bin/perl
drüber, als .pl bei Strato hochgeladen und aufgerufen:
Internal Server Error

Den zweiten Schnippsel werde ich morgen mal testen.