kill unix_to_dos script
there is really no point in having such a thing here. Change-Id: I2ffa2e911fadda1db2e402c05d59a7c88ddb30b9 Reviewed-by: Joerg Bornemann <joerg.bornemann@digia.com>
This commit is contained in:
parent
39cffc4e34
commit
c3f6a5d93b
@ -1,16 +0,0 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
undef $/;
|
||||
|
||||
foreach $f ( @ARGV ) {
|
||||
if ( open( F, "< $f" ) ) {
|
||||
$i = <F>;
|
||||
close F;
|
||||
$i =~ s/\n/\r\n/g;
|
||||
$i =~ s/\r+/\r/g;
|
||||
if ( open( F, "> $f" ) ) {
|
||||
print F $i;
|
||||
close F;
|
||||
}
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue
Block a user