use Win32::FileTime; my $filetime = Win32::FileTime->new( $filename ); printf( "%4d/%02d/%02d\n", $filetime->Modify( 'year', 'month', 'day' ) );