- or download this
if ($file =~ /Rajesh.(\d+).*/) {
print $1;
}
- or download this
my $sec = 0; # Not Feeded
my $min = 19;
...
print "$unixtime\n";
my $readable_time = localtime($unixtime);
print "$readable_time\n";
- or download this
my $CurrentTime = time();
my $Todaydate = localtime($startTime);