Вопрос по perl – Как перенаправить вывод консоли в текстовый файл

9

Я выполняю программу на Perl. Что бы ни печаталось на моей консоли, я хочу перенаправить это в текстовый файл.

Error: User Rate Limit Exceeded Paul R
Error: User Rate Limit Exceededperl -w my_program.pl > output.txt ? Paul R
stackoverflow.com/questions/387702/… Anders Lindahl
Error: User Rate Limit Exceeded Polynomial
Error: User Rate Limit Exceededstackoverflow.com/questions/2907593/… delicateLatticeworkFever

Ваш Ответ

4   ответа
10

>

perl <args> script_name.pl > path_to_your_file

open(FH, '>', 'path_to_your_file') or die "cannot open file";
select FH;
# ...
# ... everything you print should be redirected to your file
# ...
close FH;  # in the end
Error: User Rate Limit ExceededbashError: User Rate Limit Exceeded
Error: User Rate Limit Exceeded Cindrella
16

perl -w my_program.pl > my_output.txt

perl -w my_program.pl &> my_output.txt
Error: User Rate Limit Exceeded
Error: User Rate Limit Exceeded Cindrella
Error: User Rate Limit Exceeded
Error: User Rate Limit Exceeded Cindrella
1

open (STDOUT, "| tee -ai logs.txt");
print "It Works!";

close (STDOUT);

open (STDERR, "| tee -ai errorlogs.txt");
5

$ ./my-perl-program arg1 arg2 argn > output.txt 2>&1

cshtcsh

$ ./my-perl-program arg1 arg2 argn >& output.txt

C:\> my-perl-program.pl args 1> output.txt 2>&1

open STDOUT, ">", "output.txt" or die "$0: open: $!";
open STDERR, ">&STDOUT"        or die "$0: dup: $!";

Похожие вопросы