my %version_mismatch;
-$version_mismatch{$_} = $insert_dot_at_1 for qw/
+$version_mismatch{$_} = $insert_dot_at_1 for qw<
CGI-Simple
-/;
+>;
-$version_mismatch{$_} = $insert_dot_at_all_1 for qw/
+$version_mismatch{$_} = $insert_dot_at_all_1 for qw<
AnyEvent
Archive-Rar
IO-AIO
Tie-Array-Sorted
Tk-TableMatrix
XML-RSS-Feed
-/;
+>;
-$version_mismatch{$_} = $insert_dot_at_2 for qw/
+$version_mismatch{$_} = $insert_dot_at_2 for qw<
Error
-/;
+>;
-$version_mismatch{$_} = $insert_dot_at_all_2 for qw/
+$version_mismatch{$_} = $insert_dot_at_all_2 for qw<
Authen-Htpasswd
BSD-Resource
CDDB
Time-HiRes
Time-Local
perl-ldap
-/;
+>;
-$version_mismatch{$_} = $insert_dot_at_all_3 for qw/
+$version_mismatch{$_} = $insert_dot_at_all_3 for qw<
Parse-RecDescent
Return-Value
-/;
+>;
-$version_mismatch{$_} = $pad_decimals_to_2 for qw/
+$version_mismatch{$_} = $pad_decimals_to_2 for qw<
Nmap-Parser
XML-AutoWriter
-/;
+>;
-$version_mismatch{$_} = $pad_decimals_to_4 for qw/
+$version_mismatch{$_} = $pad_decimals_to_4 for qw<
Convert-BER
-/;
+>;
-$version_mismatch{$_} = $correct_suffixes for qw/
+$version_mismatch{$_} = $correct_suffixes for qw<
Gimp
XML-Grove
-/;
+>;
-$version_mismatch{$_} = $strip_letters for qw/
+$version_mismatch{$_} = $strip_letters for qw<
DelimMatch
SGMLSpm
-/;
+>;
-$version_mismatch{$_} = $letters_as_suffix for qw/
+$version_mismatch{$_} = $letters_as_suffix for qw<
Frontier-RPC
-/;
+>;
sub version_c2g {
my ($n, $v) = @_;