hola.
first off, it usually helps if we can see a more complete chunk of your code. in your pasted example, $response will always be 0. i know that people have a tendency to paste 'demo' code, but the more representative that your example is, the more accurate our response can be.
so let's presume that you're manipulating $response somehow. while perl doesn't have a built-in switch statement, you can always use a simple if-elsif-else structure. e.g. 
if ($response == 200) {
  #
}
elsif ($response == 500) {
  next; # or last, or whatever.
}
else {
  # default
}

[download]

or, if you just want to skip to the next line if a specific condition is met, try 
next if ($response == 500);

[download]
just as in english, it's generally more clear to ask in the affirmative: "is it raining?" vs. "it is not raining, is it"? that's often applicable for your code as well with if vs. unless.

also fyi, goto needs a label (or expression that returns a label), not another keyword. if you'd use strict and -w, you'd probably catch these things...
cheers..

In reply to Re: using unless($code == 200).... by seesik
in thread using unless($code == 200).... by RayRay459

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • 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! —
  • 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:
    & &amp;
    < &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.