<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Comments on: Eigene foreach-Variable in perl</title>
	<atom:link href="http://hihn.org/2008/06/eigene-foreach-variable-in-perl/feed/" rel="self" type="application/rss+xml" />
	<link>http://hihn.org/2008/06/eigene-foreach-variable-in-perl/</link>
	<description></description>
	<lastBuildDate>Sun, 07 Jun 2009 09:34:53 +0000</lastBuildDate>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
		<item>
		<title>By: Basti</title>
		<link>http://hihn.org/2008/06/eigene-foreach-variable-in-perl/comment-page-1/#comment-474</link>
		<dc:creator>Basti</dc:creator>
		<pubDate>Sun, 15 Jun 2008 09:11:34 +0000</pubDate>
		<guid isPermaLink="false">http://hihn.org/?p=99#comment-474</guid>
		<description>das geht sogar so:

#!/usr/bin/perl

my @liste = qw( asdf jkl 1 2 3 4.56 );
my @liste2 = qw( a b c d e f g );
foreach my $var ( @liste ) {
	foreach my $var2 ( @liste2 ) {
		print $var.&quot;\n&quot;;
	}
}</description>
		<content:encoded><![CDATA[<p>das geht sogar so:</p>
<p>#!/usr/bin/perl</p>
<p>my @liste = qw( asdf jkl 1 2 3 4.56 );<br />
my @liste2 = qw( a b c d e f g );<br />
foreach my $var ( @liste ) {<br />
	foreach my $var2 ( @liste2 ) {<br />
		print $var.&#8221;\n&#8221;;<br />
	}<br />
}</p>
]]></content:encoded>
	</item>
</channel>
</rss>

