-# print $sock "irscan x300.tap 0x55\n"; # SAMPLE/PRELOAD
- print $sock "drscan x300.tap $BOUNDARY_LENGTH 0x", bin2hex($b), "\n";
- print $sock "irscan x300.tap 0x00\n"; # EXTEST
-# print $sock "drscan x300.tap $BOUNDARY_LENGTH 0x", bin2hex($b), "\n";
+# print $sock "irscan $tap 0x55\n"; # SAMPLE/PRELOAD
+ print $sock "drscan $tap $BOUNDARY_LENGTH 0x", bin2hex($b), "\n";
+ print $sock "irscan $tap 0x00\n"; # EXTEST
+# print $sock "drscan $tap $BOUNDARY_LENGTH 0x", bin2hex($b), "\n";