Mega Code Archive

 

Categories / Perl / String

 

Qw across more than one lines

#!/usr/bin/perl -w use strict; print qw(      January     February     March       April     May          June       July     August          September      October     November     December )[-1];