Format string bug in h2xs
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
perl (Ubuntu) |
New
|
Undecided
|
Unassigned |
Bug Description
Binary package hint: perl
/usr/bin/h2xs have format string bug .
test case :
root@emanuel-
emanuel@
Defaulting to backwards compatibility with perl 5.10.1
If you intend this module to be compatible with earlier perl versions, please
specify a minimum perl version with the -b option.
Writing Wait/ppport.h
Writing Wait/lib/Wait.pm
Modification of a read-only value attempted at /usr/bin/h2xs line 1226, <DATA> line 1.
the bug can be found at :
$licence = sprintf << "DEFAULT", $^V;
Copyright (C) ${\(1900 + (localtime) [5])} by $author
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version %vd or,
at your option, any later version of Perl 5 you may have available.
DEFAULT
fix :
$licence = sprintf << "DEFAULT", $author , $^V;
Copyright (C) ${\(1900 + (localtime) [5])} by %s
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version %vd or,
at your option, any later version of Perl 5 you may have available.
DEFAULT