Opened by Tom at 2004-01-05 16:04
User since
2003-09-20
470 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-09-20
470 Artikel
BenutzerIn
Sorry aber mir ist kein besserer Titel eingefallen.
Also ich habe ein Kalendermodul bei dem es auch die Möglichkeit gibt das Datum zu überprüfen, um das Datum zu überprüfen muß ich das ganze so aufrufen,
Ist das Datum richtig wird 1 als Ergebniss geliefert, bei falsch 0.
Jetzt möchte ich aber das Ergebniss nicht auf dme Bildschrim ausgegeben haben sonder in einer Variable die ich dann in meinem Script weiterverwenden kann.
Nur weiß iuch nicht wi ich den Rückgabe wert in einer Variabel speichere.
Der Code sieht folgendermaßen aus
Ich hoffe ihr könnt mir bei meinem Problem helfen!
DANKE euch schonmal
Tom
Also ich habe ein Kalendermodul bei dem es auch die Möglichkeit gibt das Datum zu überprüfen, um das Datum zu überprüfen muß ich das ganze so aufrufen,
Code: (dl
)
print check_date("$day","$month","$year");Ist das Datum richtig wird 1 als Ergebniss geliefert, bei falsch 0.
Jetzt möchte ich aber das Ergebniss nicht auf dme Bildschrim ausgegeben haben sonder in einer Variable die ich dann in meinem Script weiterverwenden kann.
Nur weiß iuch nicht wi ich den Rückgabe wert in einer Variabel speichere.
Der Code sieht folgendermaßen aus
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
# Checkt das Datum
sub check_date{
return 0 if scalar @_ != 3;
my ($day, $month, $year) = @_;
my $zahl = "$day$month$year";
if($zahl =~ /[^0-9]/){return 0}
if($month > 12 or $month <= 0 or $day <= 0 and $year < 1582){return 0}
if($day > &days_of_month($month,$year)){return 0}
if($month < 10 and $year < 1582){return 0} # 15.10.1582 Gregorian Day
# over!
return 1;
}
Ich hoffe ihr könnt mir bei meinem Problem helfen!
DANKE euch schonmal
Tom
Computerprobleme??? -> http://www.weber-computerhilfe.de
Fordere keine Anerkennung!
Zeige was und man wird Dich kennen
Fordere keine Anerkennung!
Zeige was und man wird Dich kennen