Szerkesztő:GumiBot/code64

A(z) 64. kódú hibát javító kódrészlet

sub fix_64 {	# Link equal to linktext
    my ($error_code, $title_str, $text_str) = @_;

    my $count = 0;
    $count += $text_str =~ s!\[\[([^|\]]+)\|\1([[:lower:]]*)\]\]![[$1]]$2!gs;

    $count or return ('Nincs tulkomplikalt link');
    my $summary_str = $latin2->decode(
        "Bot: $count link egyszerűsítve (Hibakód: $error_code)"
    );
    return ($summary_str, $count, $text_str);
}