11s/perl/&@VERSION@/
2/eval/a
3.
4/^[^ 	]/i
5$0 =~ s/\d+\.\d+(?:\.\d+)?$//;
6.
7w
8