1#!/usr/bin/perl -w 2 3use strict; 4 5use Test::More tests => 2; 6 7BEGIN { use_ok('Music::Audioscrobbler::MPD') } 8 9my %options = ( lastfm_username => "riemann42", 10 lastfm_password => "this is not my password" ); 11 12my $mpds = Music::Audioscrobbler::MPD->new( \%options ); 13 14ok ($mpds, 'Object Created'); 15 16