Szerkesztő:GumiBot/codeadhoc 2

A Wikipédiából, a szabad enciklopédiából

A(z) adhoc_2. kódú hibát javító kódrészlet[szerkesztés]

sub fix_adhoc_2 {	# sorkezdo {{pnl}} elejbe egy csillag
    my ($error_code, $title_str, $text_str) = @_;

    my $count = 0;
    $count += $text_str =~ s/^(\{\{pnl)/\*$1/gmi;

    $count or return ('Nincs soreleji {{pnl}}');
    my $summary_str = $latin2->decode(
        "Bot: $count csillag a {{pnl}} sablon elé beszúrva"
    );
    return ($summary_str, $count, $text_str);
}