我想知道如何在Perl中实现它：
@H_403_2@while ( not the end of the files )
$var1 = read a line from file 1
$var2 = read a line from file 2
# operate on variables
end while
我不确定如何在一个while循环中从两个文件一次读取一行.
我不确定如何在一个while循环中从两个文件一次读取一行.