Hallo,
Z.B. noch die Formatierung im Forum mit BB-Code für Perl:
[highlight=perl]
Perl-Code
[/highlight]
[highlight=perl]
sub CleanCFG {
my @CFG_PLT;
if( open my $CFG_PLT, '<', $CFG_PLT) ) {
@CFG_PLT=<$CFG_PLT>;
close ($CFG_PLT);
}
foreach(@CFG_PLT) {
$pos_ = rindex($_,"_");
if ($pos_ != -1) {
push @CFG_PLT_CLEAN, substr($_,0,$pos_+1);
}
}
}
[/highlight]
Gruß Falk
Originally posted by reneeb
View Post
[highlight=perl]
Perl-Code
[/highlight]
[highlight=perl]
sub CleanCFG {
my @CFG_PLT;
if( open my $CFG_PLT, '<', $CFG_PLT) ) {
@CFG_PLT=<$CFG_PLT>;
close ($CFG_PLT);
}
foreach(@CFG_PLT) {
$pos_ = rindex($_,"_");
if ($pos_ != -1) {
push @CFG_PLT_CLEAN, substr($_,0,$pos_+1);
}
}
}
[/highlight]
Gruß Falk
Comment