$video =~ s!
   (<iframe
   [ ]title="YouTube[ ]video[ ]player"
   [ ]width=")([0-9]+)("
   [ ]height=")([0-9]+)("
   )
!
   $1 . "300" . $3 . ((300/$2)*$4) . $5
!xeg;