@list = (1) x 15; #### $_ = "foo bar baz"; $middle = (split)[1];