my $tar = Archive::Tar->new; 
$tar->add_files(
  '/var/lib/mysql/club/foo',
  '/var/lib/mysql/club/bar');
$tar->write('club_db.tar');