use strict; use warnings; use CGI qw(:standard); my $style = do {local $/;}; print header(), start_html(-style=>{-code=>$style}), div({-id=>'content'}, 'blah ' x 40), div({-id=>'content2'}, 'blah ' x 40), end_html, ; __DATA__ #content { float: left; padding: 10px; margin: 20px; background: #666; border: 5px solid #ccc; width: 300px; /* ie5win fudge begins */ voice-family: "\"}\""; voice-family:inherit; width: 270px; } html>body #content { width: 270px; /* ie5win fudge ends */ } #content2 { float: left; padding: 10px; margin: 20px; background: #666; border: 5px solid #ccc; width: 300px; /* ie5win fudge begins */ voice-family: "\"}\""; voice-family:inherit; width: 270px; } html>body #content2 { width: 270px; /* ie5win fudge ends */ }