Hello all,
have a simple task to accomplish.
A Perl-filter to write some Perl ...
from
my $1,
to
my ($1, $2, $3, $4);
Should be simple, but something is not working here, and I don't understand
why (yes yes, I am beginner):
#!/usr/bin/perl
use strict;
use warnings;
while (<>) {
foreach (1..4) {
s/ \$(\d),/ \$$1+$_,/eg;
}
print;
}
this childish attempt is doing nothing ...
greetings to all
marek
--
------------------------------------------------------------------------
Have a feature request? Not sure the software's working correctly?
If so, please send mail to <[EMAIL PROTECTED]>, not to the list.
List FAQ: <http://www.barebones.com/support/lists/bbedit_script.shtml>
List archives: <http://www.listsearch.com/bbeditscripting.lasso>
To unsubscribe, send mail to: <[EMAIL PROTECTED]>
