#!/usr/bon/perl
use strict;
use warnings;
use Data::Dumper;

my @array = (1..5);

print Dumper \@array;