他のPCと簡単に共有できるように、Excelマクロで実行するためにVBAに変換したいPerlスクリプトがあります。perlスクリプトを駆動するシェルスクリプト(パラメーターを渡す場所)があります。Perlスクリプトを使用して、固定幅のファイル(開始より下は54,63)からデータのすべての行の指定された各列を読み取り、そのデータを別のファイルと比較して、差を出力しました。runpro.pl filea.txt fileb.csv > myoutput.txt
どんな援助も素晴らしいので、私はシェルスクリプトでパラメータを渡します!特に、コードがかなり単純なので、誰かが私を正しい方向に向けることができる場合。ありがとう!
#!/usr/bin/perl
#Perl Script runpro.pl
#***************************************************
use strict;
use warnings;
my ($fa, $fb) = @ARGV;
@ARGV = $fa;
my %codes;
while(<>) {
s/[\r\n]+\z//;
$_ = substr($_, 54, 63);
s/\s+\z//;
next if $_ eq "";
$codes{$_} =1;
}
@ARGV = $fb;
my %descrip;
while(<>) {
s/[\r\n]+\z//;
s/,.*//;
s/"//g;
$descrip {$_} = 1 if s/^1234//;
}
for (sort keys %codes) {$
print "$_\n" unless ($descrip{$_});
}