#!/usr/local/bin/perl @innerlist = " abc "; @outerlist = ("I", @innerlist, "fail!\n"); print @outerlist;