#!/usr/bin/perl

use strict;
my $a = \(1..10);
print $_, " " for (@$a);