use strict;

my $stuff = join(":", <<"        END" =~ /(.+)/g);
        hi
        there
        this\tis\ta\ttest
        of the best!
        END