use warnings;
use strict;

my @files = qw(
http://use.perl.org/
http://search.cpan.org/
http://jobs.perl.org/
);

my %hash = (
   curArray  => [],
   prevArray => [],
);

foreach my $url2 ( @files ) {
    push @{ $hash{url} }, $url2;
}

use Data::Dumper;
print Dumper(\%hash);

__END__

$VAR1 = {
          'prevArray' => [],
          'curArray' => [],
          'url' => [
                     'http://use.perl.org/',
                     'http://search.cpan.org/',
                     'http://jobs.perl.org/'
                   ]
        };