Perl의 qw 함수

다음 둘은 동일하다.

 my @names = ('Apple', 'Melon', 'Orange');  
 my @names = qw(Apple Melon Orange);  

qw 는 whitespace 를 delimiter 로 삼아서 단어들을 추출한다.
() 가 아니라 / /, { }, ' ' 등으로 둘러싸도 된다. 특히 다음과 같이 많이 쓴다.

 my @names = qw/Apple Melon Orange/;  

다음 같이 써도 잘된다.

 my @names = qw:Apple Melon Orange:;  

Using the Perl qw() function