X:\>perl -MCGI=:standard
print li (
           div({"class=inforno"}, "<img src=''>")

          );
__END__
<li><div class=inforno><img src=''></div></li>