Translations:KMail/Tools/40/da: Difference between revisions
Appearance
Created page with '{{Input|1=#!/usr/bin/perl $endOfHeader = 0; while (<>) { if ( $endOfHeader == 0 ) { if ( /^(?i:Subject):\s+Bug\#(\d{4,5}):/ ) { ...' |
(No difference)
|
Revision as of 15:54, 27 September 2010
{{Input|1=#!/usr/bin/perl
$endOfHeader = 0; while (<>) { if ( $endOfHeader == 0 ) { if ( /^(?i:Subject):\s+Bug\#(\d{4,5}):/ ) { $_ = "Reply-To: $1\@bugs.kde.org\n".$_; } elsif ( /^$/ ) { $endOfHeader = 1; } } print; };