File: filesize

package info (click to toggle)
erlang 1%3A23.2.6%2Bdfsg-1%2Bdeb11u1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 199,804 kB
  • sloc: erlang: 1,509,787; xml: 412,313; ansic: 393,504; cpp: 51,923; makefile: 18,193; sh: 13,051; lisp: 9,681; java: 8,061; python: 5,195; perl: 4,322; asm: 3,586; pascal: 3,435; javascript: 595; sed: 72; php: 2
file content (11 lines) | stat: -rwxr-xr-x 324 bytes parent folder | download | duplicates (15) 
1
2
3
4
5
6
7
8
9
10
11
 
#!/usr/bin/env escript
%% -*- erlang -*-
-include_lib("kernel/include/file.hrl").

main([Filename]) ->
    {ok,#file_info{size=Size}} = file:read_file_info(Filename),
    io:format("~p\n", [Size]).

%% Deliberate warning follows so that we can check that line numbers
%% correct after an -include_lib directive.
id(I) -> I.