X-Git-Url: http://www.git.cypherpunks.ru/?a=blobdiff_plain;f=t%2Fredo-sh.tests%2Fstat_inode.rc;fp=t%2Fredo-sh.tests%2Fstat_inode.rc;h=780aaf2c0eecffe86bbbe1241aa33da40b2b4c68;hb=5dfe4d08937cc9cb2f39558359ea4df2f1e830b0;hp=0000000000000000000000000000000000000000;hpb=ed2bf87ba30cd8d5934b6f29a922e48039ab00ab;p=goredo.git

diff --git a/t/redo-sh.tests/stat_inode.rc b/t/redo-sh.tests/stat_inode.rc
new file mode 100644
index 0000000..780aaf2
--- /dev/null
+++ b/t/redo-sh.tests/stat_inode.rc
@@ -0,0 +1,5 @@
+#!/bin/sh
+
+stat_inode() {
+    perl -le 'foreach (@ARGV) { @s=stat($_); print $s[1] }'
+}