perl -e 'use strict; use warnings; 
my @stuff="This","That","Other"; 
use Data::Dumper; print Dumper(\@stuff);'
Useless use of a constant in void context at -e line 1.
Useless use of a constant in void context at -e line 1.
$VAR1 = [
          'This'
        ];