<?xml version='1.0'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:georss="http://www.georss.org/georss" xmlns:atom="http://www.w3.org/2005/Atom" >
<channel>
	<title><![CDATA[BOL: Loop over with perl]]></title>
	<link>https://bioinformaticsonline.com/snippets/view/34083/loop-over-with-perl?</link>
	<atom:link href="https://bioinformaticsonline.com/snippets/view/34083/loop-over-with-perl?" rel="self" type="application/rss+xml" />
	<description><![CDATA[]]></description>
	
	<item>
	<guid isPermaLink="true">https://bioinformaticsonline.com/snippets/view/34083/loop-over-with-perl</guid>
	<pubDate>Fri, 04 Aug 2017 11:49:44 -0500</pubDate>
	<link>https://bioinformaticsonline.com/snippets/view/34083/loop-over-with-perl</link>
	<title><![CDATA[Loop over with perl]]></title>
	<description><![CDATA[<code>my @ids =qw (scaffold_4
scaffold_4
scaffold_15
scaffold_40
scaffold_44
scaffold_51
scaffold_54
scaffold_129
scaffold_138
scaffold_138
scaffold_180
scaffold_182
scaffold_184
scaffold_219
scaffold_219
scaffold_267
scaffold_273
scaffold_282
scaffold_282
scaffold_458
scaffold_470
scaffold_480
scaffold_521
scaffold_644);

foreach my $i (@ids) {
  print &quot;Working on $i\n&quot;;
  mkdir $i;
  system (&quot;./actor.sh $i&quot;);
  system (&quot;cp *.* $i&quot;);
}</code>]]></description>
	<dc:creator>Surabhi Chaudhary</dc:creator>
</item>

</channel>
</rss>