Search results for query: *

Im trying to use a gallerific slideshow and want to use perl to open any image in the directory and make the slideshow. It works if i dont use the for loop but as soon as use the for loop it stops working. any help would be appreciated. here is the code: <color red> #!/usr/bin/perl use...

sorry this my first post im trying to sort a list by user name and count the different functions they have done with time they did each function. here is example of what a file looks like: user;work;workgroup;function;start time;comp time user1;ef1;1;1;10/12/09 8:00;10/12/09 10:00...

this is was i tried: my $cmd = "nconvert.exe -quiet -rotate $rotation -brigtness $brightness -contrast $contrast -o $out_file $in_file"; Win32::GUI::Hide($cmd); I got a usage Error. so i guess im not reall sure how to use this module. by the way thanks for the replies

I tried "start /B" and still got the cmd prompt. my $cmd = "nconvert.exe -quiet -rotate $rotation -brigtness $brightness -contrast $contrast -o $out_file $in_file"; $cmd = "start /B " . $cmd

How can i stop console windows from popping up when i call a command in backticks? Im using nconvert to manupulate images and it pops up a console window. Ive tried using Win32::Console with the free option and cannot get it to work. here is my code with win32::console: my $cmd =...

When a canvas is selected i change the hightlight color to red. When another canvas is selected i want to unselect the previous canvas. ive tried: $canvas->selectClear; and this did not work. Anyone have any ideas?

that works, but is there a way to not have to put all 14 canvas's in the for loop. by the way thanks for the replies

Im using Canvas here is a example my $canvas1 = Canvas(-width => 500, -height => 500)->pack; Then i have text on the canvas and i want to delete it. $canvas1->delete("all"); This works but i have 14 canvas's i like to delete from. Rather then typing delete 14 times i would rather do some...

I have 14 canvas's. they are names $canvas1 through $canvas14. I want to delete all of those canvas without putting delete for all 14 canvas. Here what i tried: for (1 ..14){ my $canvas = "\$canvas$_"; $canvas->delete("all"); } When i print $canvas is looks correct, but when i...

sorry i have been offline since yesterday. ive tried multiple things, but here is my last failure. for (<DAT>){ chomp; ($id,$name,$role,$wg,$auth,$lev,$app,$mode,@rest) = split(/\:/, $_); $out_apps = $apps{"apps"}{$app}; } for (keys %out_apps){ print "$_"; }

I have multiple user data files that i want to print out like the following: ID Name Role Group Level Type Apps AUTH LTR user1 SMITH JOHN SP 12 5 1 app1,app2 2,1 100 i have the included a example of a data file. the only columns that will change are columns 7 and...

While using perl-tk on hp-ux i used the -tile options with a Frame. I am now using Red Hat Linux 5.1 and when i run the tk gui i get "unknown option "-tile" ". Any ideas why this does not work on Red Hat? Here is the code: $image = $mw->Bitmap(-file => "bw.bm"); my $frame = $mw->Frame(-relief...

thanks that worked perfect

Im am struggling with a script to sort by column 2 first and then column 4. Here is what my list looks like: E78343 2008/07/26 08:54:29 TYPE1 E78351 2008/07/26 08:54:30 TYPE2 E78365 2008/07/26 08:54:32 TYPE1 E42692 2008/07/26 10:08:02 TYPE1 E243687 2008/07/26...