...{
foreach my $h (0..$ref{$A[$j][5]}) {
# can't settle on the first value. $ref-1 could be the same hit, ref{x-1} could be far, far away. *shrug*
if ( ( ($strand eq "plus") && ($B[$h][0] < $A[$j][0]-20) && ($B[$h][1] > $A[$i][1]+20) && ($A[$j][0]-$A[$i][1]>40) )
|| (...
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...
actually, i think i've got it. i put a
[code]<div style="clear:all"></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).
...get to it. When I run printer configuration to add a print queue, I can see this computer, and I can see a networked LaserJet (Jetdirect) that *it* can print to, but not the DeskJet. The share settings are the same, and the deskjet is visible and commuicable to other windows boxes on our...
...five times. You see what I'm trying to do, now tell me how to do it :c)
...And to answer before you ask, yes, i know I could write a for loop* to do that, but I want to know how to do it this way (as usual...), if I can.
* (or $_=shift(@tony);
$_=shift(@tony);
$_=shift(@tony)...
...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("eep! mrna $h doesn't have a genbank accession! you lose!"); }
else { next; }
}...
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...
personal stubbornness? I suppose I could do it the other way, and I'm probably capable of doing that already (capture ARGV[1] when ARGV[0] is > ?) but I want to figure out how to go backwards from STDOUT. Even if I wind up doing it an easier way, I'd like to know how to do things the way I was...
...how I can capture that name from within my program, without evaluating the arguments from the command line. Naturally, things like
$filename = *STDOUT;
$filename2 = \*STDOUT;
give me
*main::STDOUT
GLOB(0X14000ed60)
Is there a simple command to capture the filename (or "-" if...
Thanks for your help -- I've got it working. There are, however, still some things I don't understand:
- why (&when) perl insists on having spaces inside parentheses
- what makes a symbolic reference faster and why i should avoid using them
I am quite new at perl, and I greatly appreciate the...
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...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.