Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: FTP search ,grep using perl
Top Forums Shell Programming and Scripting FTP search ,grep using perl Post 302798455 by Corona688 on Wednesday 24th of April 2013 12:52:32 PM
Old 04-24-2013
Code:
#!/usr/bin/perl -w

use Net::FTP;

while($line=<STDIN>)
{
        chomp($line); # Remove newline from end of string
        push(@str, $line); # Add string to end of @str array
}

$ftp = Net::FTP->new("localhost");
$ftp->login('user', 'pass');
$ftp->cwd("path");
$ftp->binary;
#$flag=$ftp->mdtm($_);

my @filenames=$ftp->ls();
print " Total files:", $#filenames + 1, "\n";
$match=0;
foreach (@filenames)
{
        for my $s(@str)
        {
                if(index($_, $s) >= 0)
                {
                        print $_, " Size:[", $ftp->size($_), "]",
                                " Mtime ", scalar(localtime($ftp->mdtm($_))),
                                "\n";
                        $match++;
                }
        }
}

if($match == 0) { print "No files matched\n"; }

$ftp->quit();

 

9 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

using finddepth in ftp to search for directories in perl

Hi all, I have script which downloads the build and copies onto the local machine I am able to download files in a directory, but unable to get the files in subdierctories. I am using finddepth to search for sub directories but I am unable to do so. Here is my code: ... (0 Replies)
Discussion started by: gurukottur
0 Replies

2. Shell Programming and Scripting

Perl: Search for string on line then search and replace text

Hi All, I have a file that I need to be able to find a pattern match on a line, search that line for a text pattern, and replace that text. An example of 4 lines in my file is: 1. MatchText_randomNumberOfText moreData ReplaceMe moreData 2. MatchText_randomNumberOfText moreData moreData... (4 Replies)
Discussion started by: Crypto
4 Replies

3. Shell Programming and Scripting

perl search and replace - search in first line and replance in 2nd line

Dear All, i want to search particular string and want to replance next line value. following is the test file. search string is tmp,??? ,10:1 "???" may contain any 3 character it should remain the same and next line replace with ,10:50 tmp,123 --- if match tmp,??? then... (3 Replies)
Discussion started by: arvindng
3 Replies

4. UNIX for Dummies Questions & Answers

recursive search and ftp

Could someone help me in recursive search and ftp'ing the files to remote server? The host machine will have /dir1/dira/list_of_files1 /dir1/dirb/list_of_files2 /dir1/dirc/list_of_files3 . . . so., I need to search from dir1 recursively (only one level down) and find all the files that... (1 Reply)
Discussion started by: brahmi
1 Replies

5. HP-UX

[Solved] Unable to rename file in ftp server .Net:FTP perl

Hello All, I am trying to connect to ftp server and get the files. Also i need to rename the file in other ftp dir. rename method is not allowing me to rename the file in other dir. When i tried copy command by using net::FTP:FILE then perl says it is not installed. Can some body help me to... (2 Replies)
Discussion started by: krsnadasa
2 Replies

6. Shell Programming and Scripting

Perl - use search keywords from array and search a file and print 3rd field when matched

Hi , I have been trying to write a perl script to do this job. But i am not able to achieve the desired result. Below is my code. my $current_value=12345; my @users=("bob","ben","tom","harry"); open DBLIST,"<","/var/tmp/DBinfo"; my @input = <DBLIST>; foreach (@users) { my... (11 Replies)
Discussion started by: chidori
11 Replies

7. Shell Programming and Scripting

Perl - start search by using search button or by pressing the enter key

#Build label and text box $main->Label( -text => "Input string below:" )->pack(); $main->Entry( -textvariable => \$text456 )->pack(); $main->Button( -text => "Search", -command => sub { errchk ($text456) ... (4 Replies)
Discussion started by: popeye
4 Replies

8. UNIX for Beginners Questions & Answers

Grep/awk using a begin search pattern and end search pattern

I have this fileA TEST FILE ABC this file contains ABC; TEST FILE DGHT this file contains DGHT; TEST FILE 123 this file contains ABC, this file contains DEF, this file contains XYZ, this file contains KLM ; I want to have a fileZ that has only (begin search pattern for will be... (2 Replies)
Discussion started by: vbabz
2 Replies

9. UNIX for Beginners Questions & Answers

How to use a grep search to search for a specific string within multiple directories?

Lets say I have a massive directory which is filled with other directories all filled with different c++ scripts and I want a listing of all the scripts that contain the string: "this string". Is there a way to use a grep search for that? I tried: grep -lr "this string" * but I do not... (3 Replies)
Discussion started by: Circuits
3 Replies

LEARN ABOUT REDHAT

simpleftp

SIMPLEFTP(1)						      General Commands Manual						      SIMPLEFTP(1)

NAME

       simpleftp - rudimentary ftp client

SYNOPSIS

       simpleftp ftp://...  [ ... ]

DESCRIPTION

       simpleftp  is  a perl script that provides basic support for fetching files with FTP in a batch oriented fashion.  It takes one or more ftp
       URLS on the command line.  The file(s) will be retrieved from the remote server and placed in the current directory with the same  basename
       as on the remote; i.e., ftp://ftp.isc.org/pub/usenet/CONFIG/active.gz is stored as active.gz in the current directory.

BUGS

       simpleftp  is  an  extremely  poor substitute for more complete programs like the freely available wget or ncftp utilities.  It was written
       only to provide elementary support in INN for non-interactive fetching of the files in ftp://ftp.isc.org/pub/usenet/CONFIG/ without requir-
       ing administrators to install yet another package.  Its shortcomings as a general purpose program are too numerous to mention, but one that
       stands out is that simpleftp does not understand the complete syntax of URLs, only the hostname and pathname parts -- it  will  not  under-
       stand username, password, port or parameter strings.

HISTORY

       Tossed off by David C Lawrence <tale@isc.org> for InterNetNews.

SEE ALSO

       actsync(8).

																      SIMPLEFTP(1)
All times are GMT -4. The time now is 05:46 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy