Возникла необходимость переформатировать файл описания графов .GDL в формат .DOT. На просторах интернета нашел скрипт под PERL, но как это не печально он брыкается, т.к. в нем вставлена команда OC Linux CAT. У Windows соответственно такой команды конкатенации нет. Какая конструкция может заменить эту команду. Вот этот фрагмент.
#!/usr/bin/perl
use strict;
my $FILE1 = $ARGV[0];
open(OUTFILE, ">".$FILE1.".dot") or die "File doesn't exist\n";
my $indata = `cat $FILE1`;
Этот скрипт я взял тут.