my $tag = 'test text     ';
chomp $tag;
print $tag . '#';

> test text     #