Epic Bug in mein Perl ?! Test it!