<?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: Perl One-Liner to print only non-uppercase letters]]></title>
	<link>https://bioinformaticsonline.com/snippets/view/41986/perl-one-liner-to-print-only-non-uppercase-letters?</link>
	<atom:link href="https://bioinformaticsonline.com/snippets/view/41986/perl-one-liner-to-print-only-non-uppercase-letters?" rel="self" type="application/rss+xml" />
	<description><![CDATA[]]></description>
	
	<item>
	<guid isPermaLink="true">https://bioinformaticsonline.com/snippets/view/41986/perl-one-liner-to-print-only-non-uppercase-letters</guid>
	<pubDate>Tue, 21 Jul 2020 21:25:33 -0500</pubDate>
	<link>https://bioinformaticsonline.com/snippets/view/41986/perl-one-liner-to-print-only-non-uppercase-letters</link>
	<title><![CDATA[Perl One-Liner to print only non-uppercase letters]]></title>
	<description><![CDATA[<code>#Go through file and only print words that do not have any uppercase letters.
perl -ne &#039;print unless m/[A-Z]/&#039; dna.fa &gt; dnaOnlyLowercase.fa

#To lowercase everything 
perl -pne &#039;tr/[A-Z]/[a-z]/&#039; dnaUpperCase.fa &gt;dnawithoutuppercase.fa;</code>]]></description>
	<dc:creator>BioStar</dc:creator>
</item>

</channel>
</rss>