#!/bin/bash

perl -e 'prnt "Hallo\n"'

if [ $? -ne 0 ]; then
    ln="$LINENO"
    let "ln -= 3"
    echo -e "\nSomething went wrong in Perl-command, line $ln.\n"
fi