in reply to Inappropriate ioctl for device

As almut says, this is nothing to worry about. If you carefully look at your strace output, you'll see that perl even performs a TCGETS ioctl on the your script file!

Perl makes other information gathering calls when it opens a file such as calling _llseek with whence set to SEEK_CUR. You might wonder why perl has to ask what the file position is if it just opened a file. It turns out that it's logically cleaner to always ask rather than assume.

Replies are listed 'Best First'.
Re^2: Inappropriate ioctl for device
by Anonymous Monk on Feb 17, 2012 at 18:11 UTC 
    # Grab the first word...
        if ( $! =~ /Inappropriate/i )
        {
            # Bug in perl 5.8.6...  we're ignoring this message...  (I
+nappropriate ioctl for device) Warning...
        }
        else
        {
                 print "System Message on Open --> $! \n" ;
         print "Not fatal if the file doesn't exist, because the open 
+will create the file...\n";
         print "Continuing... \n";
        }

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom