> @list1 = qw( artist awful billy blunder) 
> @list2 = qw( attitude blatherskite) 
>
> # something magical happens, and the contents of @list1 are now 
> # 'artist', 'attitude', 'awful', 'billy', 'blatherskite', 'blunder' 

@list1 = qw[ artist awful billy blunder ];
@list2 = qw[ attitude blatherskite ];

push @list1, @list2;

@list1 = sort @list1;

foreach $item (@list1) {
    print "$item\n";
}

== OUTPUT ==
artist
attitude
awful
billy
blatherskite
blunder

_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to