Неужели не существует способа сделать из
Jan. 19th, 2012 09:05 amfile.1 1 2 3 1 2 3 1 2 3и
file.2 4 5 6 4 5 6 4 5 6некий
file.3 1 2 3 4 5 6 1 2 3 4 5 6 1 2 3 4 5 6в том же perl'e? Или в чем-то другом?
file.1 1 2 3 1 2 3 1 2 3и
file.2 4 5 6 4 5 6 4 5 6некий
file.3 1 2 3 4 5 6 1 2 3 4 5 6 1 2 3 4 5 6в том же perl'e? Или в чем-то другом?
no subject
Date: 2012-01-19 05:28 am (UTC)no subject
Date: 2012-01-19 06:21 am (UTC)no subject
Date: 2012-01-19 06:18 am (UTC)1 2 3 4 5 6
1 2 3 4 5 6
1 2 3 4 5 6
#
no subject
Date: 2012-01-19 06:26 am (UTC)no subject
Date: 2012-01-19 06:31 am (UTC)no subject
Date: 2012-01-19 07:37 am (UTC)no subject
Date: 2012-01-19 07:38 am (UTC)no subject
Date: 2012-01-19 08:02 am (UTC)no subject
Date: 2012-01-19 06:20 am (UTC)В качестве упражнения предпложите, что делает команда cut
no subject
Date: 2012-01-19 06:22 am (UTC)open f1,"file.1"; @strings1=; close f1; chomp @strings1; open f2,"file.2"; @strings2=; close f2; chomp @strings2; open f3,">file.3"; for ($i=0;$i<=$#strings1;++$i) { print f3 $strings1[$i]." ".$strings2[$i]."\n"; } close f3;как-то так.
не тестировал :)
no subject
Date: 2012-01-19 07:41 am (UTC)no subject
Date: 2012-01-19 07:06 am (UTC)no subject
Date: 2012-01-19 08:08 am (UTC)no subject
Date: 2012-01-19 07:14 am (UTC)присоединить к элементам одного массива элементы другого
$n = @file_1;
$n --;
foreach $i (0..$n){
$file_3[$i] = $file_1[$i].$file_2[$i] ;
}
no subject
Date: 2012-01-19 08:06 am (UTC)no subject
Date: 2012-01-19 08:19 am (UTC)Массивы, операции и функции - база. Лучше просто иметь список под рукой, он умещается на один лист.
А вот регулярные выражения, упаковка-распаковка, библиотеки-модули и т.п. - это для спецов, т.к. с ними получается нечитабельный код.