add version header

git-svn-id: http://svn2.nishi.boats/svn/milsko/trunk@428 b9cfdab3-6d41-4d17-bbe4-086880011989
This commit is contained in:
NishiOwO
2025-10-20 08:33:21 +00:00
parent f1d7fe87bb
commit 768bb7327b
6 changed files with 48 additions and 14 deletions

View File

@@ -2,11 +2,11 @@
# $Id$
open(IN, "<", $ARGV[0]);
while(my $l = <IN>){
$l =~ s/\r?\n$//g;
$l =~ s/%([^ ]+)/@\1/g;
if(!($l =~ /\@prop /)){
print("$l\n");
}
while (my $l = <IN>) {
$l =~ s/\r?\n$//g;
$l =~ s/%([^ ]+)/@\1/g;
if (!($l =~ /\@prop /)) {
print("$l\n");
}
}
close(IN);