perl -e 'use Data::Dumper; print Dumper(stat("file.txt"));'