Using STDIN, how can I use perl to take an input string, with all lower case letters in the first five characters, and convert them to uppercase...

then take all uppercase letters in the second five characters and convert them to lowercase.

Example:
MichaelSmith to michaELSMIth

Thank you!

doubleminus,

try this...

#!/usr/bin/perl
$str = <STDIN>;
chomp $str;
print lc(substr($str, 0,5)) . uc(substr($str, 5, 5)) . substr($str, 10) . "\n";

Enter in
MichaelSmith

It lowercases the first 5 chars, concatenated to the uppercase of the next 5 characters, concatenated to the remaining characters, concatenated to a newline char.

Perfect, exactly what I needed. Great learning experience. Thank you.