#!/usr/local/bin/perl use CGI::Carp 'fatalsToBrowser'; print "Content-type: text/html\n\n"; $alt = 'foo.html'; $neu = 'bar.html'; rename $alt, $neu or die "Konnte die Datei $alt nicht in $neu umbenennen: $!";