my $inode_number = (stat DATA) [1];  # And not fileno!