Mega Code Archive

 

Categories / Perl / Language Basics

 

Assign string array to @ARGV by using qw

#!/usr/bin/perl -w use strict; @ARGV = qw/file1.txt file2.txt file3.txt/; while (<>) {     print; }