Функция chop удаляет последний символ строки. Она имеет следующий формат:
$character = chop(Str);
Функция chop возвращает удаленный символ. Скрипты языка Perl широко используют chop для удаления символа перехода на новую строку и символа конца строки.