Perl内に 'paste'とAWKスクリプトを使用する次のコードがあります。 use strict;
use Data::Dumper;
use Carp;
use File::Basename;
my @files = glob("result/*-*.txt");
my $tocheck = $ARGV[0] || "M";
foreach my $file (
cygwinのgawkを使用するawkスクリプトがあります。今はcygwinがインストールされていないが、Perlを持っている同僚にこれらのスクリプトを渡す必要があります。私はちょうどcygwinの中に含まれているA2Pを使用することができます願っていたが、それは次のようなエラーで失敗します。 Undefined subroutine &main::gensub called at ./t.pl