I want produce this tag when read from 'file.txt'.

<text:p text:style-name="Standard">
 Hello
</text:p>

with using this perl script:


#!/usr/bin/perl
 
use CGI::Pretty qw(text:p);
$c = new CGI;
open(FILE, "file.txt");
while($line = <FILE>)
{
  print $c->text:p({-'text:style-name'=>"Standard"},$line);
}
close FILE;



but if 

use CGI::Pretty qw(text)

it can do that, with produce

<text text:style-name="Standard">
 Hello
</text>