Added -T option for cdripper and tagfromfilename.
This commit is contained in:
9
cdripper
9
cdripper
@ -1,7 +1,7 @@
|
||||
#!/usr/bin/perl
|
||||
#
|
||||
# CD Ripper
|
||||
# usage: cdripper [-o num] [--no-cddb] [-a] [-y] [target_directory]
|
||||
# usage: cdripper [-o num] [--no-cddb] [-T] [-a] [-y] [target_directory]
|
||||
#
|
||||
# Rips the contents of an audio CD into Ogg Vorbis files
|
||||
# Puts the files in target_directory/artist/album_name/
|
||||
@ -11,6 +11,7 @@
|
||||
#
|
||||
# Changelog:
|
||||
# 0.2.4: Fixed bug - files should get tagged again
|
||||
# Added support for -T option
|
||||
# 0.2: Aligned version with ds-audiotools
|
||||
# Implemented CDDB support (disabled with --no-cddb)
|
||||
# Ability to preview and edit all text before it's used
|
||||
@ -39,7 +40,8 @@ $HELP_MSG = "# CD Ripper v$VERSION\n\tusage: cdripper [--no-cddb] [-a] " .
|
||||
"Options:\n-a:\t\tAsk users about multiple CDDB options\n" .
|
||||
"-o [num]:\tOffset track numbers by num. The first track will be num+1\n" .
|
||||
"-y:\t\tDon't prompt for user confirmation of CDDB information\n\t\t(assume defaults are okay).\n" .
|
||||
"--no-cddb:\tDon't use CDDB. Prompt the user for all information.\n";
|
||||
"--no-cddb:\tDon't use CDDB. Prompt the user for all information.\n" .
|
||||
"-T:\t\tWrite uppercase tag names. Passes -T to tagfromfilename";
|
||||
|
||||
$CDPARANOIA_FORMAT = 'track*.cdda';
|
||||
$TRACK_ZERO = 'track00';
|
||||
@ -65,6 +67,7 @@ foreach (@ARGV)
|
||||
elsif (/^--no-cddb$/) { $useCDDB = 0; }
|
||||
elsif (/^-f$/) { $noInput = 1; }
|
||||
elsif (/^-a$/) { $askCDDB = 1; }
|
||||
elsif (/^-T$/) { $uppertags = '-T'; }
|
||||
else
|
||||
{
|
||||
$target_directory = $_;
|
||||
@ -101,7 +104,7 @@ chdir($final_location);
|
||||
warn "Some files were not automatically named." if $unhandledFiles;
|
||||
|
||||
# Add vorbiscomment data
|
||||
system('tagfromfilename', @new_tracks);
|
||||
system('tagfromfilename', $uppertags, @new_tracks);
|
||||
|
||||
# Clean up
|
||||
chdir($orig_dir);
|
||||
|
Reference in New Issue
Block a user