I'm still fairly new to Perl. I'm working through some basics to improve my understanding. I tried to use Larry Wall's Perl rename script, but keep getting an error.
#!/usr/bin/perl -w
$op = shift or die "Usage: rename expr [files]\n";
chomp(@ARGV = <STDIN>) unless @ARGV;
for ( @ARGV )
{
$was = $_;
eval $op;
die $@ if $@;
rename ( $was, $_ ) unless $was eq $_;
}
I have a directory of file titled something like "Blah Blah - 01 - Peter.txt" and "Blah Blah - 02 - Lois.txt", etc. I want to strip off the "Blah Blah - 01 - " part, so I tried the following commands:
perl rename.pl 's/Blah Blah - \d{2} - //' *
perl rename.pl 's/^Blah Blah - \d{2} - //' *
and a couple of other variations. Each time I get the same error:
Can't find string terminator "'" anywhere before EOF at (eval 1) line 1
Am I doing something really stupid here? Did I copy the code wrong? Is something wrong with my regex?
I'm using Strawberry Perl 5.10.1 on W7 x64.
Thanks.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|