Fixed unit test to work with Perl 5.12.
Fixed unit test to work with Perl 5.12.

muehlbauer/otrs,s7design/otrs,brandonshults01/otrs,linearregression/otrs,rudy500/otrs,brandonshults01/otrs,xhoy/otrs,mburggraf/otrs,crythias/otrs,linearregression/otrs,nilei/otrs,xhoy/otrs,thorsteneckel/otrs,brandonshults01/otrs,thorsteneckel/otrs,s7design/otrs,MBRG/otrs,muehlbauer/otrs,crythias/otrs,mburggraf/otrs,nilei/otrs,xhoy/otrs,eliasp/otrs,eliasp/otrs,crythias/otrs,mburggraf/otrs,muehlbauer/otrs,mburggraf/otrs,muehlbauer/otrs,linearregression/otrs,mburggraf/otrs,brandonshults01/otrs,s7design/otrs,xhoy/otrs,crythias/otrs,MBRG/otrs,MBRG/otrs,rudy500/otrs,muehlbauer/otrs,crythias/otrs,nilei/otrs,rudy500/otrs,eliasp/otrs,brandonshults01/otrs,linearregression/otrs,nilei/otrs,thorsteneckel/otrs,rudy500/otrs,thorsteneckel/otrs,s7design/otrs,eliasp/otrs,eliasp/otrs,MBRG/otrs,s7design/otrs,xhoy/otrs,linearregression/otrs,thorsteneckel/otrs,rudy500/otrs,nilei/otrs,MBRG/otrs