Perl6::Form is a lot better than format. The usage is a lot easier.
loris request can be done like so:

use warnings;
use strict;
use Perl6::Form;

my %name_n_price_tag;

print form "#\tName\tPrice", 
           "#\t------    -------";

while (<DATA>) {
    chomp;
    my ( $name, $price ) = split /:\s/, $_, 2;
    $name_n_price_tag{$name} = $price;
}

print form
  "\t{|||||}\t{|||||}", $_, $name_n_price_tag{$_}, $/
  for sort keys %name_n_price_tag;

__DATA__
large: 90.12
small: 12.34
medium: 57.78
[download]

#    Name    Price
#    ------    -------
     large      90.12

    medium      57.78

     small      12.34
[download]