#!/usr/local/bin/perl
use strict;
use warnings;

@home = ("couch" , "chair" , "table" , "stobe");