#! /usr/bin/perl use strict; use warnings; my $string = qq!Hallo klicke bitte ~hier§http//url.de~ Wenn Dir das nicht gefällt, dann klicke doch mal ~da§http//woanders.de~ Das wars auch schon  ~Foobar§http://test.de~!; my $linksign = '~'; my $delimiter = '§'; $string =~ s!$linksign([^$delimiter]*?)$delimiter([^$delimiter]*?)$linksign!$1!sg; print $string,"\n";