$ perl -le " $!= $^E = 22; printf qq/%d %s\n%d %s\n/, $!,$!,$^E,$^E " 22 Invalid argument 22 The device does not recognize the command