perl -MO=Deparse -e '@stuff = "This","That","Other";' @stuff = 'This', '???', '???';