rcs corrupting file on ci

Signing message:
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1


Hi, folks --

Create a file foo.txt with only this line (might be wrapped here):

$Date::Manip::NoTaint = eval { local $^W=0; eval("#" . substr($^X, 0, 0)); 1 };

then:
$ ci foo.txt
$ co foo.txt
$ cat foo.txt
$Date: 2007/12/13 23:34:21 $^W=0; eval("#" . substr($^X, 0, 0)); 1 };

where the date string corresponds to the time of the invocation of ci.

This behavior is independent of the location of the line in the file. 
The original string can be found at line 37 of DateManip.pm v5.44.

Cheers -d

- -- 
David Talkington
Computing and Communications
University of Washington
206-543-2144
- - --
[email protected]
KE7EOG
- - --
PGP key: http://staff.washington.edu/dtalk/004B8F8B.asc
- - --
recursive, adj: see "recursive"

- -----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.7 (GNU/Linux)

iD8DBQFHYb33PQsnwuKc9QQRApmZAJ9vluGX+UJHEGxIX5WRT9LExIDwQQCgmC/B
E6pm2t2BMsJfkFvuBSwiBDc=
=PFW0
- -----END PGP SIGNATURE-----
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.7 (GNU/Linux)

iD8DBQFHYcY5PQsnwuKc9QQRAku6AJ9fk9LeLi1DXK/0jmkQKdH+8Im0MwCgitj/
ehr52Qojix21PpkVrvvnbgE=
=DYsm
-----END PGP SIGNATURE-----