Trim trailing whitespace from pseudoheader values.
* Adam Heath:
- Convert all code to use global read/write functions, instead of having
it duplicated everwhere.
+ - Trim trailing whitespace from pseudoheader values. Closes: #153590.
-- Colin Watson <cjwatson@debian.org> Mon, 25 Nov 2002 03:50:20 +0000
#!/usr/bin/perl
-# $Id: process.in,v 1.66 2003/05/03 20:01:20 doogie Exp $
+# $Id: process.in,v 1.67 2003/05/03 20:53:03 doogie Exp $
#
# Usage: process nn
# Temps: incoming/Pnn
{
last if $phline !~ m/^([\w]+):\s*(\S.*)/;
my ($fn, $fv) = ($1, $2);
+ $fv =~ s/\s*$//
print DEBUG ">$fn|$fv|\n";
$fn = lc $fn;
$fv = lc $fv;