perl -MData::Dump -lane "my($scalar,@array)=split; dd $scalar; dd @array" exampledata.txt
"A"

("another", "awesome", "awful")

"E"

("example", "estinguished")