Re: [PERL] 'date', format

["Peder H. Reuther" <sslug@sslug>]

On Thu, 11 Jan 2001, Nils Lastein wrote:

> localtime'... Ex.
> 
>     #!/usr/bin/perl
>     @time = localtime(time);
>     print "$time[2] $time[1] \n";

Kanon! Jeg gør sådan her

	#!/usr/bin/perl
	@time = localtime(time);
	if ($time[4] eq 6) {				# juli
        	while ($time[3] eq 30) {		# den 31.
	        open MAIL,"|mail sslug@sslug";
        	print MAIL "du har fødselsdag\n";
	        close MAIL;
        	}
#	} else {				--> for test
#        	print "Ingen mail til dig\n";  
#	}


Og så skulle den være hjemme. Er du enig?

Køre programmet 'af sig selv' hvis jeg bare placerer filen i
/usr/bin? Der er jo ikke megen ide i et reminder-program, hvis jeg skal
huske at eksekvere programmet, hver gang det skal hjælpe med at huske  :-)