use HTML::Tiny;
my $co = HTML::Tiny->new;
my $filename = 'theme1';
print $co->tag ('audio', { controls=>"", type => "audio\/mpeg", src => "$filename.mp3"});
print "\n";