Форум: "Потрепаться";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
ВнизВопрос по Перлу Найти похожие ветки
← →
Дмитрий (2001-12-13 12:43) [1]open(<IN>, "a.txt");
my @in = (<IN>);
my @ar = (
"First row",
"Second row"
);
my $str = "Third row";
unshift(@in, $str);
unshift(@in, @ar); #unshift(@in, $str, @ar);
open(<IN>, ">a.txt");
print IN @in;
close(IN);
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c