Recent content by sasuser2006

I am running a perl script on a brand new linux box and I've executed it three times and all three times the OS has rebooted mid way through the script. I've ran the script successfully on a 10 record file and it works but the file I need to run it on is 192MM records and 1109 bytes long...

Because of the end users. I'm aware that a formula of: =SUMPRODUCT(--($A1=$A$1:$A$65535)) Gives me the count I'm looking for and I could then sort, but I would prefer to have a macro that the end user just runs and is possibly prompted for the column that they want to sort.

I'm looking for an Excel macro that will sort a column and bring the duplicates to the top. For example... Worksheet before macro... ID 1 1 1 4 2 3 5 4 3 5 Worksheet after macro... ID Count of ID 1 3 1 3 1 3 3 2 3 2 4 2 4 2 5 2 5 2 2 1 The sort will float the IDs with the most...

I have experiance writing base SAS and Perl in a linux environment but I'm looking to expand my knowledge into something different. I want to learn how to create windows applications and with so many OOP languanges out there I'm not really sure which to start with...C++, C#, Visual Basic, Ruby...

I'm trying to create a perl script that creates a sql script to load a table to a database based on a CSV file that's passed to perl and I'm having a problem. Currently the piece of the code says: ... open (CSV_FILE, "$csv_file") or die "Can't open $csv_file: $!"; open (SQL_FILE...

That worked perfectly. Thanks a lot for the help!.

Sorry I forgot to repost and tell everybody that something about the || print REPORT was messing it up. I took that out and it worked. On a side note I've got a new problem... For the below statement... foreach $file (@all_files) { $ftp-> get($file); print...

There are files in the directory so I as well am stumped. Thanks for all your help on this though.

I've made the change and the log file is still returning the array error... ARRAY(0x8ccfe8c) I'm not understanding this...it's not too complicated but for some reason it won't work. Any other suggestions???

Thanks for continuing to look at this. The exact code is... #!/usr/bin/perl use Net::FTP; my $now = localtime; my $report_path = "/u01/home/ftp.log"; my $path = "/***/***/***/"; my $ftpdest = "***"; my $ftpuser = "***"; my $ftppass = "***"; open (REPORT, ">$report_path"); print REPORT "It...

Thanks for the reply! Unfortunately the problem still exists and here is the new error log... ---Listing File--- for ARRAY(0x881dbc0) ---End of list--- Downloaded !!! Any other suggestions...

Also a newbie...thanks for the quick post but I've put () after the ls and still returns nothing. I've manually posted the files to the ftp site and can see them when I log in. At first I thought it was a path error but the report returns the correct path when the $ftp->pwd; command is...

I'm trying to log into an ftp server to monitor for a file but when I do an ftp->ls it's not returning anything. Any help would be much appreciated. #!/usr/bin/perl use Net::FTP; my $now = localtime; my $report_path = "/u01/home/ftp.log"; my $path = "path"; my $ftpdest = "host"; my $ftpuser...

I just tried this and it just gives me the usage for the sudo command...it doesn't prompt me for a password. The link was interesting and I might be able to use it but I'm curious what the password would be for "sudo"ing gpg. Thanks for the response.

I'm running this script to encrypt in perl on a linux box... #!/usr/bin/perl my $key = "PGP_KEY"; my $file = $ARGV[0]; $cmd = "sudo -u gpg /usr/bin/gpg --homedir=/u01/home/mydir/.gnupg --no-tty --encrypt --recipient \"$key\" < $file > $file. gpg "; $res = system("$cmd"); if($res) {...