<?xml version="1.0" encoding="UTF-8"?><!-- generator="wordpress/2.3.2" -->
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	>
<channel>
	<title>Comments on: Perl vs. Ruby breaking from nested loops</title>
	<link>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/</link>
	<description></description>
	<pubDate>Sun, 12 Oct 2008 02:31:25 +0000</pubDate>
	<generator>http://wordpress.org/?v=2.3.2</generator>
		<item>
		<title>By: Slaven Rezić</title>
		<link>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/#comment-6447</link>
		<dc:creator>Slaven Rezić</dc:creator>
		<pubDate>Thu, 04 Oct 2007 22:59:17 +0000</pubDate>
		<guid>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/#comment-6447</guid>
		<description>Why you need Error.pm? You can do both with stock perl5, the quite ugly exception-style and using a
return value from the throw:

my $counter = 0;
eval {
    foreach my $outer (1..5) {
	foreach my $inner ('A'..'E') {
	    print "$outer: $inner\n";
	    die { message =&#62; "jump out!" } if ++$counter &#62; 4
	}
    }
};
use Data::Dumper; print Dumper $@;</description>
		<content:encoded><![CDATA[<p>Why you need Error.pm? You can do both with stock perl5, the quite ugly exception-style and using a<br />
return value from the throw:</p>
<p>my $counter = 0;<br />
eval {<br />
    foreach my $outer (1..5) {<br />
	foreach my $inner ('A'..'E') {<br />
	    print &#8220;$outer: $inner\n&#8221;;<br />
	    die { message =&gt; &#8220;jump out!&#8221; } if ++$counter &gt; 4<br />
	}<br />
    }<br />
};<br />
use Data::Dumper; print Dumper $@;</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Brian</title>
		<link>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/#comment-497</link>
		<dc:creator>Brian</dc:creator>
		<pubDate>Sun, 03 Dec 2006 19:01:59 +0000</pubDate>
		<guid>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/#comment-497</guid>
		<description>I was wrong, it does work in Perl.  Thanks for pointing it out.  You are incredibly rude, however.  Please learn how to interact with other human beings in a polite manner. :)</description>
		<content:encoded><![CDATA[<p>I was wrong, it does work in Perl.  Thanks for pointing it out.  You are incredibly rude, however.  Please learn how to interact with other human beings in a polite manner. :)</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Dave</title>
		<link>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/#comment-495</link>
		<dc:creator>Dave</dc:creator>
		<pubDate>Sun, 03 Dec 2006 18:32:11 +0000</pubDate>
		<guid>http://briancarper.net/2006/12/03/perl-vs-ruby-breaking-from-nested-loops/#comment-495</guid>
		<description>&#62; # How do you break to HERE?????

WTF???  How about "last HERE;"?  RTFM.</description>
		<content:encoded><![CDATA[<p>&gt; # How do you break to HERE?????</p>
<p>WTF???  How about &#8220;last HERE;&#8221;?  RTFM.</p>
]]></content:encoded>
	</item>
</channel>
</rss>
