sub format_text {
        my %args = (@_);

sprintf( "%$args{length}f", $args{string} );
}