Sau đây là một cách giải nghĩa cho chữ Ám (暗):
- Nghĩa: Tối (Tối ở đây là tối sáng chứ không có nghĩa là ban đêm).
- Số nét: 13
- Cách phát âm:
- On:アン
- Kun:くら.い,くら.む,くれ.る
Live, Learn, Work And Share
$|++;
use strict;
use warnings;
use DateTime::Format::Strptime;
use Win32API::File::Time qw{:win};
my $parser = DateTime::Format::Strptime->new( pattern => '%m/%d/%Y %H:%M');
my $filename="Test.txt";
my $cdate="12/10/2012 2:00";
my $mdate="12/14/2012 9:00";
my ($atime, $mtime, $ctime) = GetFileTime ($filename);
$mtime = $parser->parse_datetime($mdate)->epoch;
$ctime = $parser->parse_datetime($cdate)->epoch;
SetFileTime ($filename, $atime, $mtime, $ctime);