in reply to Replacing one string with another string

use File::Find;
find sub {
  push @ARGV, $File::Find::name if /\.INF$/;
}, ".";
$^I = ".BAK";
while (<>) {
  s/Name/Fullname/g;
  print;
}

[download]
Not too tough. About that tough.

-- Randal L. Schwartz, Perl hacker

Replies are listed 'Best First'.
RE: Re: Replacing one string with another string
by lindex (Friar) on Aug 18, 2000 at 10:30 UTC
    Just a simpleton question .. but why do you do subname sub { # code .. # }
    and not sub subname { # code .. # }
    this doesnt seem to compile on my install of perl (5.6)


    lindex 
    /****************************/
  jason@gost.net, wh@ckz.org
    http://jason.gost.net
/*****************************/

    [download]
[reply]
[d/l]
[reply]
        ahhhhhhhhhh, thank you :)


        lindex 
        /****************************/
  jason@gost.net, wh@ckz.org
    http://jason.gost.net
/*****************************/

        [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom