use DateTime; my $time = DateTime->now(); $time->set_time_zone('Asia/Tokyo'); my $today = $time->strftime('%Y%m%d'); my $now = $time->strftime('%H:%M');
use DateTime; my $time = DateTime->now(); $time->set_time_zone('Asia/Tokyo'); my $today = $time->strftime('%Y%m%d'); my $now = $time->strftime('%H:%M');