Recent Changes - Search:

edit SideBar


Firefox 2
Get Thunderbird!

DateTimeLocaltime

Perl.DateTimeLocaltime History

Hide minor edits - Show changes to markup

December 31, 2005, at 04:53 AM by 85.105.66.26
Changed lines 8-9 from:

print date();

to:

print date(), "\n";

December 31, 2005, at 04:52 AM by 85.105.66.26
Changed lines 8-12 from:

my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time); printf "%4d-%02d-%02d %02d:%02d:%02d\n", $year+1900,$mon+1,$mday,$hour,$min,$sec;

to:

print date();

sub date {

	my ($sec,$min,$hour,$mday,$mon,$year,$wday, $yday,$isdst)=localtime(time);
	$mon++;
	$year += 1900;
	my $tarih = "$year.$mon.$mday" . "_" . "$hour.$min.$sec";
	return $tarih;

}

December 31, 2005, at 04:47 AM by 85.105.66.26
Added lines 1-13:

Günün tarihinin biçimli yazdırılması:

(:code:) #!/usr/bin/perl use strict; use warnings; my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time); printf "%4d-%02d-%02d %02d:%02d:%02d\n", $year+1900,$mon+1,$mday,$hour,$min,$sec;

Edit - History - Print - Recent Changes - Search
Page last modified on December 31, 2005, at 04:53 AM