scriptvers.ed   [plain text]

1s/perl/&@VERSION@/
/eval/a
.
/^[^ 	]/i
$0 =~ s/\d+\.\d+(?:\.\d+)?$//;
.
w