#!/usr/bin/perl
while (<>) {
    s/(font-size:[0-9.]+)([^0-9.a-z])/\1px\2/go;
    print $_;
}
