perl -MData::Dumper -e '
$key = "test text\r\n"; 
chomp $key; 
print Dumper $key;
'

##</code><code>##

$VAR1 = 'test text
';

##</code><code>##

$VAR1 = 'test text';