do you mean: print $fd $_ for @x;
On Sun, 09 May 2010 12:07:38 +0800, Xiao Lan (小兰) <practicalp...@gmail.com> wrote:
use strict; use warnings; my $cfg = "1.txt"; my @x = qw/a b c 1 2 3/; my $fd; open $fd,">",$cfg or die $!; print $fd for @x; close $fd;
-- Using Opera's revolutionary e-mail client: http://www.opera.com/mail/ -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
