perl - get filesize with -s

Question

I am trying to find filesize using -s operator. I looks like this:

my $filesz = -s $filename

I tried lots of various way but it can not get this size.
However, If I give static content instead of filename, it works fine

For exa:
$filesz = -s "/tmp/abc.txt"

This works fine.
I tried adding " in filename, it didn't work. I removed \n from filename using chomp, problem remains same. Anyone having any idea whats wrong here?

Answer 1

-s $filename works just fine; the only conclusion is that there's no file with the name contained in $filename. Take a very close look at the contents of $filename, and make sure that your working directory is what you think it is.

Answer 2

you can try this, it worked for me:

$thefile="somefile";
@stats=stat("$thefile");

@stats now has:
1.Device number of file systems
2.inode number
3.file type and permissions
4.hard link quantity
5.owners UID
6.owners group number of UID
7.device identifier
8.total size in bytes (gives a weird number in linux at least)
9.last access time
10.last modification time
11.inode change time
12.preferred block size for file system IO
13.actual number of blocks allocated

Answer 3

As hobbs says, the most likely explanation is that $filename doesn't contain what you think it does.

Based on previous experience, I'd go further than that and hesitate a guess that $filename has a newline character at the end of it. Are you reading the value in $filename from a file or from user input?