Professional Web Applications Themes

directory and file operations - PERL Beginners

Hi, I want to open all (.txt,.html,.js files) files in a particular directory and replace a text in all that files. What I done so far was a script to replace text in all files in the current directory. What I want was," When I run the script,it should ask for the path of a particular directory and also the types(all files of its type in that dir) of files to open. I wrote a script to change the directory to I specified through commandline.but again it lists only the files in current directory. Please help me in this issue, ...

  1. #1

    Default directory and file operations

    Hi,
    I want to open all (.txt,.html,.js files) files in a particular directory
    and replace a text in all that files.
    What I done so far was a script to replace text in all files in the current
    directory.
    What I want was," When I run the script,it should ask for the path of a
    particular directory and also the
    types(all files of its type in that dir) of files to open.

    I wrote a script to change the directory to I specified through
    commandline.but again it lists only
    the files in current directory.
    Please help me in this issue,
    The code is

    print "Enter a path name: ";
    my $path=<STDIN>;
    chdir($path);

    my $file='';
    my files=<*.txt>;

    foreach $file (files){
    {
    inner loop for pattern matchinh
    };


    Thanks for the help.
    Muthukumar.



    Muthukumar Guest

  2. #2

    Default Re: directory and file operations

    MuthuKumar wrote: 


    chdir never "stays" in the directory...

    Proof:

    print "Enter a path name: ";
    my $path=<STDIN>;
    chdir($path);
    print `pwd`;

    You want -
    perldoc -f opendir

    Wc Guest

  3. #3

    Default RE: directory and file operations

    WC -Sx- Jones wrote: 
    >
    >
    > chdir never "stays" in the directory...[/ref]

    Huh? Sure it does.
     

    That doesn't prove anything. The chdir fails because the input needs to be
    chomp'ed. Neither the OP nor you is checking the return value from chdir().

    Try:

    chomp(my $path = <STDIN>);
    chdir $path or die $!;
    print `pwd`;
    Bob Guest

Similar Threads

  1. directory operations
    By Muthukumar in forum PERL Beginners
    Replies: 2
    Last Post: April 1st, 10:02 AM
  2. File Operations
    By Cameron in forum PHP Development
    Replies: 1
    Last Post: January 8th, 02:01 PM
  3. File Operations and System Calls in Perl (WAS: some doubt)
    By Tim Johnson in forum PERL Beginners
    Replies: 0
    Last Post: December 12th, 07:29 PM
  4. advice on file operations
    By kiaoraFiona webforumsuser@macromedia.com in forum Macromedia Director Lingo
    Replies: 2
    Last Post: November 5th, 04:46 PM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139