print 3 + 2 <<5;
5
    ;

sub five_sub() {
    return 5
}
print 3 + 2 << five_sub;
five
    ;

print 3 + 2 . <<five_mark0;
a
five_mark0

print 3 + 2 . <<~five_mark1;
a
five_mark1

print 3 + 2 << ~five_sub;
five_sub;

print 3 + 2 . << "five_mark2";
	ox
five_mark2






