Recent content by darkreaper00

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)...

problem solved: -calculation field: img_name= object_name&".jpg" -import folder of images into container, matching filename to img_name

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...

actually, i think i've got it. i put a [code]<div style=&quot;clear:all&quot;></div>[code] in between my elements. thanks again for your elegant suggestion

ChrisHunt -- you certainly got it to do what you thought I wanted, and it is close, but it's not quite there. Each of the h4 lines should line up vertically with a picture to the right. Right now i have all my pictures on the right, but the text is continuous on the left and pays no attention...

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...

(ok, so it wasn't on a domain) anyhow, i got it working. apparently my linux box got terribly confused by an underscore in the share name, but my windows computers didn't. thanks for your help!

Yes, it's in a domain (well, it's in a workgroup; I think we understand these to be the same?), and the LaserJet appears as a share under the XP machine (and I can set it up as a queue through it).

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...

I think you're both right about what it's doing with my code, but justice41, your code does the same thing. I fixed it using this loop: while ($_=shift(@tony)) { if (m!mRNA: .*/gb=([\w]+)!) { last; } elsif (m!mRNA:!) { die(&quot;eep! mrna $h doesn't have a genbank accession! you...

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...

To clarify, I want the user to be able to type this at the command line: process-hits < sourcefile > output.blixem then, depending on the contents of sourcefile, i may want to output to multiple files, in which case i would want to name them output_01.blixem, output_02.blixem, etc. Going from...