#!/usr/bin/perl @a = ; print @a;