my %hash = (':-)' => 'lachen.gif', ';-)' => 'zwinker.gif');
my $string = 'Dies;-) ist ein Test :-)';

$string =~ s!$_!<img src="./$hash{$_}">!g;