Search results for query: *

I am pulling my hair out here, because @B should be static! foreach my $chr (keys %hits) { foreach my $strand (keys %{$hits{$chr}}) { my %ref; ## sort by location on subject then location on query. my @A = sort {$a->[2]<=>$b->[2] || $a->[0]<=>$b->[0]}...

I'm running a map for checkbuttons in a grid. map should pass the same value to each $_, but it is not doing so. At first I had only the -text and -variable, and noticed that the variable passed was not the correct one. So I added the print STDERR command, and it's receiving an empty value of...

I have a command bound to objects on a canvas like so: $canvas->bind($id, '<ButtonRelease-2>' => [\&netscape, $org, $call_subject, $B_hits[$m]{qstart}, $B_hits[$m]{qend}]); It calls the function netscape() correctly, but my arguments are passed as things like: Tk::Canvas=HASH(0x14059da90)...

I have a db with ~3000 records in FMP 7 (Mac), and I have an image library that will give me an image for a container field in each record. The filename for each image corresponds to a field in the record (<<object_number>>.jpg), and I want to create a script that will insert the image with the...

so i have images on the right side of a page, and text to the left of them.. sometimes the text won't extend below the image, and when this happens, i _cannot_ get the next image/table to display underneath the first image, rather than wrapping next to it. i've got them in their own tables and...

hoping this is the right spot to post this; I've mostly lingered with questions in the Perl forum. I have a windows XP 2002 SP1 machine with an HP DeskJet 1220c shared over our Windows network. I have a machine running RedHat 9 that I want to connect via samba to print to this printer, but I...

this: ($_=shift(@tony)) x5; doesn't do what I want it to do: namely, go to the fifth value after the current one, and trash all the others. I know that this generally pertains to strings, but with perl being so intuitive-friendly, I'd like it to intuit me telling it to do something five...

Here's my snippet of code: else { $_=shift(@tony) until (/Genomic: .*\|([\dyxpq_])+[Tt]el/); print STDERR &quot;6.5 &quot;; $telomere = $1; print STDERR &quot;7 &quot;; $_=shift(@tony) until (m!mRNA: .*/gb=([\w]+)!) or die(&quot;eep! mrna $h doesn't have a genbank accession! you...

I have a program for which the user specifies the output as an argument in the commandline -- i.e. > filename puts my program's output to STDOUT into a file named filename. I want to know how I can capture that name from within my program, without evaluating the arguments from the command line...

Hey everyone-- I have an array of hashes that I want to turn into a collection of strings with the keys as their names and the values conserved. (so that in lots and lots of code i can type $key instead of $array_name[$h]{key}). This was the first test program I made, and it was successful...

I've got myself a program that parses another program's output and formats it in a way that is useful to our lab. The biggest hangup I have with the program is trying to get it to print my usage message when /? is used for an argument. Below is the first way I tried to do that, before I...