Уважаемые форумчане, подскажите, пожалуйста, две вещи:
1) что делает данный скрипт;
2) есть ли аналоги для следющих команд Perl в bash:
open(string1, 'text.txt') ;
open(string2, «>directory») ;
print string2 "(page 0 0 1 1\n" ;
while ($line=<string1>) {
$line =~ s/\«/\\\»/g ;
print string2 "(line 0 0 1 1 \«$line\»)\n" ;
}
print string2 ")\n" ;
close (string1) ;
close (string2) ;
Если аналоги команд выше есть, не могли бы вы помочь с переводом скрипта в bash? Или выложить готовый, или снабдить списком манов? :-)
Форум —
Development
