read FILE, $line, sizeof("s50c150");
unpack( "s50c150", $line );