Since the goal of Perl Golf is to make the code as short as possible, it seems to me that making the code strict-compliant is a waste of characters. Especially since one could just do something like:

sub seq{
($~=pop)=~s/./$&.*/sg;pop=~/$~/s
}
[download]

:)

I do try to avoid warnings in my Golf solutions, though.