Hi Ovid,thanks for helping me, actually,I want to print out the time the file is created.as we can see,when we right click the file name and see the properties,it will tell the time the file is created,modified and accessed,and I want to print anyone of it.how I can do it? Please check my script guys. opendir (DIR,$dir) or die "Can't open folder $dir: $!\n"; @files = readdir DIR or die "Couldn't read from $dir: $!\n"; foreach $file (@files) { use Time::localtime; my $ctime = (stat $file)10; print "$file $ctime \n"; } closedir DIR; thanks for the concern