@res = stat "file_to_stat";
    print qq($res[7]\n);