#!/usr/local/bin/perl @a = \`ls\`; print @a