WIP island determination; can recognise a pixmap!

[ypp-sc-tools.main.git] / pctb / yppsc-decode-marketdata

diff --git a/pctb/yppsc-decode-marketdata b/pctb/yppsc-decode-marketdata
index e8f0ef0b3df447ba306e2ca90871a317f7914936..d798aad03a1e8de8bc274e5de9837c5635801848 100755 (executable)
--- a/pctb/yppsc-decode-marketdata
+++ b/pctb/yppsc-decode-marketdata
@@ -2,9 +2,10 @@
 
 use IO::Handle;
 
+open CM, "#commodmap#.tsv" or die $!;
+
 $debug=1 if @ARGV;
 
-open CM, "commodmap" or die $!;
 while (<CM>) {
     m/^(\S.*\S)\t(\d+)$/ or die;
     $commodmap[$2]= $1;