-(4**2)

Унарные операторы.
'
!' – логическое отрицание
'
-' – арифметический минус
'
~' – побитная инверсия (дополнение до 1)
'
+' – арифметический плюс
'
\' – получение ссылки на переменную (как & в С)

Операторы «привязки»
=~ и !~ .
Эти «необычные» я бы даже сказал оригинальные операторы имеют очень широкое применение в Перл. Можно даже назвать их «оригинальным» решением.
Оператор 
=~логически связывает левую часть выражения с патерном (pattern – образец, шаблон, модель) в правой. По умолчанию поиск или изменение по патерну выполняется в переменной $_ Операторы привязки позволяют делать это с любой переменной указанной в левой части. Логическим результатом будет успех операции. Если в правой части вместо патерна присутсвует выражение, то результат этого выражения воспринимается как патерн. Однако это не очень эффективно т.к. патерн будет компилироваться во время исполнения программы что заметно снизит быстродействие. 
Оператор 
!~ аналогичен 
=~ только результат совпадения инвентируется (логическое «нет»). Подробное применение этих операторов приводится в главе «Патерны».

Мультипликативные операторы.
'
*' – арифметическое умножение
'
/' – арифметическое деление
'
%' – арифметический модуль
'
x' – оператор повторения
В скалярном контексте возвращает строку левой части повторенную величиной указанной в правой части. В списковом контексте, если в левой части список в круглых скобках – повторенный список.
Пример:
print '*' x 5; # Результат '*****'
print (1,2) x 3; # Результат 121212

Аддитивные операторы.
'
+' – арифметический плюс
'
-' – арифметический минус
'
.' – конкатенация (объединение) строк

Операторы сдвига.
'
<<' – Сдвигает побитно влево значение выражения в левой части на количество бит указанное в правой.
'
>>' – Сдвигает побитно вправо значение выражения в левой части на количество бит указанное в правой.

Именованные унарные операторы.
Фактически это функции с одним аргументом.