#! /usr/bin/perl

use strict;
use warnings;

my $string = qq~Normaler Text! #Aufzählung1# #Aufzählung2# Normaler Text usw. #Aufzählung3#~;

$string =~ s/#([^#]+)#\s?/<ul><li>$1<\/li><\/ul>/g;
print $string;