Fixed with José Pedro Silva Pinto comments.
Thanks
Lorenzo
On 12/7/05, Dan Klose <[EMAIL PROTECTED]> wrote:
>
> On Wed, 2005-12-07 at 12:50 +0200, Lorenzo Caggioni wrote:
> > HI!!!
> Hi
> > i'm tring to use DBI module
> >
> > Here is the code
HI!!!
i'm tring to use DBI module
Here is the code
#!/geneva/geneva/dev1/perl5/bin/perl
#
use strict;
use DBI;
use warnings;
my $dbh = DBI->connect( 'dbi:Oracle:MYSEED,
'donald',
'duck',
{
RaiseErr
Hi!
I write a big program in perl that open some file, and copy them to an other
directory.
To do move files I use this command:
system("mv","in_file/i","in_file/o") == 0
or die "Cannot reject input file: $! \n";
At the beginning, when the program aws little, it worked fine: If it can
emember what you are doing
> > where and why please make sure you do not write subs like that unless
> you
> > are very good at documenting your code as you are writting it.
>
> Hi Rob
>
> [see inline]
>
> > On 11/25/05, John Doe <[EMAIL PROTECTED]> w
Attached you can find the code an a input file to try it.
I'm sorry if the code is not realy commented and if it is no real clear, but i have to delete some line because it is base on a database
Now the program can run without any DB.You can find even a profile for the program.
Thanks
L
Hi,
What I have to do is:
1- Read Line from an input file
2- Validate the raw (for example: is second char == 2?)
3- Split the line
4- Write the validated and splitted raw in an output file whit a different
order (for example: last 2 digits I have to write as first 2 digits)
I have
