#!/usr/bin/perl x @foo= 1..10; x "@foo";