Opened by Gast at 2006-08-18 05:12
Moin Comuity...
ich habe ein kleinen IRC Bot geschrieben, nun kommt mein Problem
er soll aus diesem String:
Angreifer: (ETA5) 13:10 - 25:1 - 69:4 - 69:5 - 241:5 - 273:3
mir die 13:10 25:1 usw ausgeben aber nur diese Teile...
und von dem hier:
Angreifer: (ETA7) 51:10,(ETA8) 114:6
das gleiche.. allerdings kann es sein das er immer anders ist aber in einem dieser formate ist er.
Bis jetzt habe ich es so gelöst:
Allerdings bekomme ich bei diesem Code nur dieses gesplittet so wie ich es brauch:
Angreifer: (ETA7) 51:10,(ETA8) 51:10
Wäre Super wenn mir einer dabei helfen könnte..
MfG
Waterball
ich habe ein kleinen IRC Bot geschrieben, nun kommt mein Problem
er soll aus diesem String:
Angreifer: (ETA5) 13:10 - 25:1 - 69:4 - 69:5 - 241:5 - 273:3
mir die 13:10 25:1 usw ausgeben aber nur diese Teile...
und von dem hier:
Angreifer: (ETA7) 51:10,(ETA8) 114:6
das gleiche.. allerdings kann es sein das er immer anders ist aber in einem dieser formate ist er.
Bis jetzt habe ich es so gelöst:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
$text =~ s/[a-z]| //gi;
$text =~ s/-/\n /g;
$text =~ s/[.?\!\"\;_] //g;
my @Adresse = split(/,/,$text);
my $eta;
# my $inc = $Adresse[2];
my $i = 0;
# my $ii = 0;
for(@Adresse) {
if ($i == 0) {
$eta = substr($Adresse[0],4,50);
main::irc_say($remotenick,$eta);
} else {
$eta = substr($Adresse[$i],3,50);
main::irc_say($remotenick,$eta);
}
$i++;
}
Allerdings bekomme ich bei diesem Code nur dieses gesplittet so wie ich es brauch:
Angreifer: (ETA7) 51:10,(ETA8) 51:10
Wäre Super wenn mir einer dabei helfen könnte..
MfG
Waterball