use HTML::Entities qw( encode_entities );

while (<VRUN>) {
    print encode_entities($_);
}