$size_of_DATA = read(DATA, $buf='', -s DATA);