---
name: "CDDB_get"
section: "3pm"
platform: "linux"
package: "libcddb-get-perl"
version: "2.28-4"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/CDDB_get"
---

# CDDB\_get(3pm)

Read the CDDB entry for an audio CD in your drive

## NAME

CDDB - Read the CDDB entry for an audio CD in your drive

## SYNOPSIS

```
 use CDDB_get qw( get_cddb );
 my %config;
 # following variables just need to be declared if different from defaults
 $config{CDDB_HOST}="gnudb.gnudb.org";          # set cddb host
 $config{CDDB_PORT}=80;                 # set cddb port
 $config{CDDB_MODE}="http";                     # set cddb mode: cddb or http
 $config{CD_DEVICE}="/dev/cdrom";               # set cd device
 # user interaction welcome?
 $config{input}=1;   # 1: ask user if more than one possibility
                     # 0: no user interaction
 # get it on
 my %cd=get_cddb(\%config);
 unless(defined $cd{title}) {
   die "no cddb entry found";
 }
 # do something with the results
 print "artist: $cd{artist}\n";
 print "title: $cd{title}\n";
 print "category: $cd{cat}\n";
 print "cddbid: $cd{id}\n";
 print "trackno: $cd{tno}\n";
 my $n=1;
 foreach my $i ( @{$cd{track}} ) {
   print "track $n: $i\n";
   $n++;
 }
```

## DESCRIPTION

This module/script gets the CDDB info for an audio cd. You need LINUX, SUNOS or \*BSD, a cdrom drive and an active internet connection  in order to do that.

## INSTALLATION

Run "perl Makefile.pl" as usual. ("make", "make install" next)

## LICENSE & DISCLAIMER

This library is released under the same conditions as Perl, that is, either of the following:

a) the GNU General Public License Version 2 as published by the  Free Software Foundation,

b) the Artistic License.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See either the GNU General Public License or the Artistic License for more details.

You should have received a copy of the Artistic License with this Kit, in the file named "Artistic".  If not, I'll be glad to provide one.

You should also have received a copy of the GNU General Public License along with this program, in the file names "Copying"; if not, write to  the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,  MA 02111-1307, USA.

If you use this library in a commercial enterprise, you are invited, but not required, to pay what you feel is a reasonable fee to the author, who can be contacted at armin@xos.net

## AUTHOR & COPYRIGHT

(c) 2003 Armin Obersteiner \<armin(at)xos(dot)net\>

## SEE ALSO

[**perl**(1)](/perl/1.md), Linux: */usr/include/linux/cdrom.h*,  Solaris, \*BSD: */usr/include/sys/cdio.h*.