>perl -wE"say sin('foo')"
Argument "foo" isn't numeric in sin at -e line 1.
0

>perl -wE"say cos('3.1415bar')"
Argument "3.1415bar" isn't numeric in cos at -e line 1.
-0.999999995707656