or download this
./hbat-test
"my" variable $data masks earlier declaration in same scope at ./hbat-
+test line 41.
...
Use of uninitialized value in concatenation (.) or string at ./hbat-te
+st line 105.
Use of uninitialized value in concatenation (.) or string at ./hbat-te
+st line 105.
Device Type = ..