Чтобы использовать обе кавычки ' и " и не экранировть их слешем, печатай, например, так
Print q~<textarea name="styled-textarea" id="styled" onfocus="this.value=''; setbg('#lightyellow');" ~;
Смотри
http://perldoc.perl.org/perlop.html#Quote-Like-Operators