Perl_标准输入_STDIN

发布时间：2020-12-16 00:25:25 所属栏目：大数据来源：网络整理

导读：Perl_标准输入_STDIN ? #!usr/bin/perl -w use strict; my @a=STDIN;??#停止输入的时候按ctrl+D my $out="/dir/out"; open OUT,"$out" || die "$!n"; foreach $a (@a) { ?? print OUT "$a"; }

Perl_标准输入_STDIN

#!usr/bin/perl -w
use strict;
my @a=<STDIN>;??#停止输入的时候按ctrl+D my $out="/dir/out"; open OUT,">$out" || die "$!n"; foreach $a (@a) { ?? print OUT "$a"; }

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!