c:\test>perl -nlE"say '*' . substr $_, -7"
1235551234
*5551234
0011235551234
*5551234
5551234
*5551234
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.