@arrayUnsorted=('page1.html', 'page11.html', 'page2.html', 'page3.html');

##</code><code>##

@arraySorted=('page1.html', 'page2.html', 'page3.html', 'page11.html');

##</code><code>##

opendir my $dir, "." or die "Cannot open directory: $!";
my @files = readdir $dir;
my @filesHTML;

foreach (@files){
	if ($_ =~ /html/) {
	 push @filesHTML, $_;
	}
}