Excellent but with small changes

Works perfect but I tweeked the output format.

@perfdata = sort @perfdata;
printResultAndExit($exitVal, join(‘ – ‘, @msg) . “|” . join(‘n’, @perfdata));
# end main