$var='dasjkelrjojasfseraosfijdsfjwerodogjwrjkwefdojvgdkjljwerosjoadewrdsafderaf';
$var =~ s/(.{20})/$1 /g;
print $var;