perl Convert-BER