I have tried but failed to create a script to descend into directory /var/log/accounts/ where there will be several hundred files (randomly named), pickup one of those files, open it and read the contents into variables. The file is arranged like the following 'username,domain,email,service'. Once it has read the contents in and run the code that i have created, it will then need to close that file, delete that file, and go round in a loop until no more files in that directory exist.

Ok, ap3k, lets look at what you said. 

#    ... descend into directory /var/log/accounts/...

my $directory = '/var/log/accounts/';
opendir DIR, $directory or die $!.$/;
#    ... several hundred files ...
my @files = readdir(DIR);
closedir DIR or warn $!.$/;

    ... go round in a loop until no more files ...

for my $file  (@files) {
    # ... open it ...
    open FILE, $file or die $!.$/;                    
    # ... into variables ... username,domain,email,service ...
    my ( $username, $domain, $email, $service ) =         
    split /,/, <FILE>;    # ... read the contents ...
    # run the code that i have created
    #your code here!
    
    # ... close that file, ...
    close FILE or warn $!.$/;
      # ... delete that file ...
    unlink $file;
}
=cut

[download]

That's (deliberatly) not perfect code. You will have to read the docs on readdir, split, open, unlink and probably grep, to get it to do something properly, but that will be a relief from abusing that poor monitor with your head!

Well It's better than the Abottoire, but Yorkshire!

In reply to Re: Re: Re: Peruse my code... by BrowserUk
in thread Peruse my code... by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.