Danke für den Hinweis.
Ich habe mir anhand der Funktion stat() mal das folgende Script zusammengebaut (geschustert). Werde ich morgen mal weiter verfeinern.
##########################################
my $file = "sqlnet.log";
my $logpath = "D:/temp/";
chdir ("$logpath") or die "chdir nach $logpath nicht möglich : $!";
my @dateistat = stat($file);
my $zeitstempel = $dateistat[9]; # [9]=Zeitstempel des letzten schreibenden Zugriffs
my $datum = localtime $zeitstempel;
my($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat,
$Jahr, $Wochentag, $Jahrestag, $Sommerzeit) = localtime $zeitstempel;
$Monat+=1; #Monat +1(++), weil er er sonst von 0 bis 11 gezählt wird
$Jahr+=1900; #Jahr +1900 weil time nur die vergangene Zeit ab 1900 ausgibt
$zeitstempel=sprintf("%4d.%02d.%02d %02d:%02d:%02d",$Jahr,$Monat,$Monatstag,$Stunden,$Minuten,$Sekunden);
print "$file $zeitstempel\n";
##########################################

Ausgegeben wird jetzt: sqlnet.log 2006.12.05 06:01:01

Allerdings ist der Programmcode ziemlich wüst. Ich sehe mir auch mal das Package File::Stat an.
Vielleicht hat ja noch jemand einen Verbesserungsvorschlag für mein Script.
DANKE