Something like this?

for (keys %csv) {
    $sql{"EMP_$_"} eq $cvs{$_} and next;
    print "$_ values are different:\n",
          "  SQL: ".$sql{"EMP_$_"}."\n",
          "  CSV: $sql{$_}\n\n";
}
[download]

cLive ;-)