1#!
2#[[BEGIN PROPERTIES]]
3# Type = Command
4# Order = 1.0
5# Interpreter = perl
6# Caption = File Info
7# Descr =Show some general information about a file or directory.
8# Descr =This calls "stat", "file" and "md5sum" in a terminal.
9# Descr =
10# Descr =Selection details:
11# Descr =
12# Descr =  Source: Ignored.
13# Descr =
14# Descr =  Target: The file or directory to be inspected.
15# Hotkey = Ctrl+I
16# Icon = file_info.tga
17#[[END PROPERTIES]]
18
19use strict;
20use warnings;
21BEGIN { require "$ENV{'EM_DIR'}/res/emFileMan/scripts/cmd-util.pl"; }
22
23if (IsFirstPass()) {
24
25	ErrorIfNotSingleTarget();
26
27	SecondPassInTerminal("File Info");
28}
29
30print("Results of \"stat\":\n");
31system('stat','--',GetTgt());
32
33print("\nResults of \"file\":\n");
34system('file','--',GetTgt());
35
36print("\nResults of \"md5sum\":\n");
37system('md5sum','--',GetTgt());
38
39TermEndByUser(0);
40