$perl -we'eval "use Errno qw/EINVAL/"; print EINVAL'
Name "main::EINVAL" used only once: possible typo at -e line 1.
print() on unopened filehandle EINVAL at -e line 1.

$perl -we'use Errno qw/EINVAL/; print EINVAL'
22