Opened by Duff at 2007-10-18 18:20
User since
2005-01-17
14773 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14773 Artikel
Admin1
Schau dir mal mit perldoc -f grep die Doku an
;)
Ansonsten:
;)
Ansonsten:
Code: (dl
)
1
2
3
4
5
6
7
use strict;
use warnings;
my @arr = ('malp', 'ach', 'test');
print grep(/$ARGV[0]/,@arr) ? 'JAAAA' : 'och nee :(';
1;