http://qs321.pair.com?node_id=11120464

Lady_Aleena has asked for the wisdom of the Perl Monks concerning the following question:

I just saw that one of my dies returned "Inappropriate ioctl for device" at the end of the string I wanted to be returned. Is it something I need to worry about, or can I safely ignore it? I've tried to figure out what it means, and what I did wrong from various Google searches and reading here and elsewhere about it. I just do not understand it. So, other than knowing that "ioctl" stands for "input/output control" and I did something inappropriate with it, I am a bit lost.

So, do I dive in and drive myself a little crazy trying to figure it out? Can I safely ignore it, not letting it worry me? Could it bite me later?

Here is the code where I got the message.

die "$_ isn't using strict, $!" if ($loop == 1 && $line !~ /use st +rict/ && $_ !~ /index/); die "$_ isn't using strict, $!" if ($loop == 2 && $line !~ /use st +rict/ && $_ =~ /index/); die "$_ isn't using warnings, $!" if ($loop == 2 && $line !~ /use wa +rnings/ && $_ !~ /index/); die "$_ isn't using warnings, $!" if ($loop == 3 && $line !~ /use wa +rnings/ && $_ =~ /index/);

My OS is Debian 10 (Buster); my perl versions are 5.28.1 local and 5.16.3 or 5.30.0 on web host depending on the shebang.

No matter how hysterical I get, my problems are not time sensitive. So, relax, have a cookie, and a very nice day!
Lady Aleena