http://qs321.pair.com?node_id=336952


in reply to sprintf to zero-pad on the right

What about using substr..? 
my $strlen = "00000000";
my $string = "TEXT";
substr($strlen, -length($string)) = "$string";

[download]

You can then print "$strlen\n";

-----
Of all the things I've lost in my life, its my mind I miss the most.

In Section Seekers of Perl Wisdom