#!/usr/local/bin/perl -w

use strict;

my $alter = (-M "test.pl");              # Gleitkommazahl!
print "Letzte Änderung vor $alter Tagen\n";