Comment detail

ファイルサイズの取得 (Nested Flatten)

Erlang初投稿です。よろしくお願いします。 とりあえず、システムコールを呼ぶ回数を1回にしました。 erlide(Eclipse)で確認しました。

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
-module(file_size).
-export([file_size/1]).

-include_lib("kernel/include/file.hrl").

file_size(Name) ->
    try file:read_file_info(Name) of
        {ok,Fileinfo} ->
            case Fileinfo#file_info.type of
                regular ->
                    io:format("~B~n",[Fileinfo#file_info.size]);
                _ -> ok % except file
            end;
        _ -> ok % cannot get infomation
    catch
        _ -> ok % exception
    end.

Index

Feed

Other

Link

Pathtraq

loading...