我将这个 Perl 单行代码拼凑在一起,以确定某些文件的 Stata“ds_format”...
for file in *.dta; do perl -MParse::Stata::DtaReader -e 'open my $fileHandle, "<", @ARGV; my $dta = new Parse::Stata::DtaReader($fileHandle); print "$ARGV[0] is in STATA ds_format " . $dta->{ds_format} ,"\n\n";' $file; done
...但我认为有一种方法可以使用命令行stata
命令来获取相同的信息。在那儿?上面的脚本为我的文件打印:
study1a.dta 是 STATA ds_format 113
study1b.dta 是 STATA ds_format 115
study2.dta 是 STATA ds_format 115
也可以看看: