#!/usr/bin/perl
use strict;
use warnings;
use Fcntl qw(:DEFAULT);
use 5.010;

use HTML::Entities;
my $enti = HTML::Entities::encode_entities("was muss hier rein?");
say "Ergebnis: $enti";