a rune

diff --git a/pcb/generate-netspec.pl b/pcb/generate-netspec.pl
index 7c148dd2dc70dfa5179e1f0a12d529e8be903937..6c95bad5ceefc71c51af74fe9dab82b464f10a95 100755 (executable)
--- a/pcb/generate-netspec.pl
+++ b/pcb/generate-netspec.pl
@@ -1,6 +1,9 @@
 #!/usr/bin/perl
 # -*- fundamental -*-
 
+# handy rune for grepping net orders etc:
+# <reversers.net perl -ne 'next unless m/\bPOINTS-(\d+)\b/; printf "%02d\t%s",$1,$_' | sort
+
 use IO::Handle;
 
 die unless @ARGV==1;