my $pb = pb_fillup(<showlen>,<char>,<barlen>);