http://www.perlmonks.org?node_id=258319

joggi has asked for the wisdom of the Perl Monks concerning the following question:

I initally tried: open(CD,"/dev/cdrom"); read(CD,$lable,32,32808); print "lable--$lable\n"; close CD; but it doesn't work,what's the matter?thanks