You show a very incomplete piece of code that is even missing the label cont. I'm not sure what this piece of code is supposed to do or how or where I could see that it is skipping every second line.

Please remove irrelevant parts of your code, and add the parts that show the results you get.

As an aside, please also do work on your indentation. Your code is very hard to read for me:

if (length($pais) < 1){
$pais = $cc;
$adm1 = $codes{$adm1};

if ($cc !~ /US/gi){
$adm2 = $codes{$adm2};
}
...
[download]

is much easier to read when formatted as

if (length($pais) < 1){
    $pais = $cc;
    $adm1 = $codes{$adm1};

    if ($cc !~ /US/gi){
        $adm2 = $codes{$adm2};
    }
...
[download]

That way, it becomes clear where each if block begins and ends.

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.