Re: [PERL] 'date', format

["Nezar Nielsen" <sslug@sslug>]

----- Original Message -----
From: "Peder H. Reuther" <sslug@sslug>
To: <sslug@sslug>
Sent: Thursday, January 11, 2001 10:55 PM
Subject: Re: [PERL] 'date', format


> 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.

Hmmm      ^^^^^ Hvorfor bruger du while i stedet for if her? mit indtryk er
at så vil dit script blive ved med at stå at sende dig mails indtil du
afbryder det, eftersom $time[3] altid er 30...(medmindre du ændrer den inde
i blokken - hvilket du ikke gør lige nu..)

>           open MAIL,"|mail sslug@sslug";
>           print MAIL "du har fødselsdag\n";
>         close MAIL;
>        }


Husk at når du skal sammenligne ting, så skal du i strengsammenligninger
bruge 'eq', og i talsammenligninger bruge '==', dvs. ret dine eq'er til ==

--
Mvh. Nezar Nielsen
http://fez.dk/