fix warnings in future perl
version 1.0602