Opened by Gast at 2008-07-30 19:34
User since
2005-01-17
14749 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14749 Artikel
Admin1
Verwende bitte in deinen Skripten:
use strict;
use warnings;
use diagnostics;
korrekter wäre das so:
use strict;
use warnings;
use diagnostics;
korrekter wäre das so:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
my $test1 = "18.02.2008";
if($test1 =~ m/^\d{2}\.\d{2}\.(\d{4})$/ ){
print("TRUE\n");
}
else{
print("FALSE\n");
}