1
0
mirror of git://projects.qi-hardware.com/wernermisc.git synced 2025-04-21 12:27:27 +03:00

labsw/mech/: added process to mill front plate

This commit is contained in:
Werner Almesberger
2011-09-04 20:36:30 -03:00
parent 2be054814c
commit 596fe88023
3 changed files with 113 additions and 0 deletions

17
labsw/mech/filter Executable file
View File

@@ -0,0 +1,17 @@
#!/usr/bin/perl
$on = 1;
while (<STDIN>) {
$line = $_;
if (/^#%id=/) {
chop($id = $');
$on = 1;
for (@ARGV) {
if ($_ =~ /^!/) {
$on = 0 if $id =~ $';
} else {
$on = 0 unless $id =~ $_;
}
}
}
print $line if $on;
}