for(my $x=14; $x<@fileContents; $x++)

##</code><code>##

for (13 .. $#fileContents) {
    print "$fileContents[$_]\n";    # Or whatever
}

##</code><code>##

my $lines_to_skip = 14;

while (my $line = <$file>) {
    # $. will give you the current line number of the file
    next if ($. <= $lines_to_skip);  
    chomp($line);
    # Do stuff with $line
}