I think what you mean is @ARGV not $ARGV, such as this:

my ($file) = @ARGV;

my $mtime = (stat($file))[9];  # Index 9 according to docs

utime($mtime,$mtime,$file);    # See @ARGV in docs
[download]

The extra quotes around variables like "$ARGV" are mostly meaningless, and can be left out.