nope. nobody touches or can touch the CGIs but me, i haven't worked on them
since last tuesday, and i had the code checked by a third party. the offending
snippets for debugging (open the message window wide!):
#bit that replaces $short_name (the filename after the path is ripped off)
1 my $short_name_length = length($short_name);
2 for ($i=0; $i<$short_name_length; $i++) {
3 if (substr($short_name,$i,1) eq " ") {
4 substr($short_name,$i,1) = "_";
5 }
6 }
#end bit
this works fine. the file is transferred to the correct directory with the
spaces replaced with underscores.
#bit that's going wrong
1 if ($total_size > 0) { #File was transferred
2 print "<p>Your file has been uploaded. Here is the relevant
information:";
3 print "<p><b>File Name:</b> $short_name<br><b>File Size:</b>
$total_size";
4 print $query->startform(-method=>'POST',
5
-action=>'../empr/private/mm_listb.pio?-database=PIO_Minutes&-layout=main&-add',
6
-name=>'mmForm');
7 print $query->hidden('Topics', $Topics);
8 print $query->hidden('MeetingDate', $MeetingDate);
9 print $query->hidden('JobNoCalc', $jn);
10 print $query->hidden('EnteredBy', $EnteredBy);
11 print $query->hidden('FileSize', $total_size);
12 print $query->hidden('file', $short_name);
13
14 print "</form>";
15
16 }
#end bit
the first $short_name (line 3) works fine, with the spaces replaced with
underscores as the previous bit is supposed to do. the second $short name
(line 12) has kept the spaces. Perl experts? is this a perl 5.0004 problem?
it has to build a form so the values can be passed to a filemaker database via
lasso...
thanks!
On Thursday, November 16, 2000, Stephanie Wright <swright@xxxxxxxxx> wrote:
>>
>>here's the kicker: this EXACT cgi worked PERFECTLY last week. i
>>tested the crap out of it to make sure. the client emails me today
>>and tells me it doesn't work anymore. sure enough he's right.
>>
>>has anyone else had perl flakiness problems before? if so i'd like
>>to know how it was taken care of, or if it can be taken care of at
>>all...
>
>Perl with WebTen should work flawlessly.
>
>Since it was working and now doesn't, is there any possibility that
>the script has gotten changed or damaged somehow? Maybe saved with an
>incorrect creator code or something?
>--
> Stephanie J. Wright
>
--
---------------------------------------
c h r i s t o p h e r . a . j e n s e n
---------------------------------------
n Vision/usa inc.
w: http://www.nvisionusa.com
e: cj@xxxxxxxxxxxxx
p: 6164566566
f: 6164566599
----
Tenon Intersystems' WebTen Mailing List
To unsubscribe: send mail to webten-request@xxxxxxxxx
with the subject: unsubscribe
Find searchable Mailing List archives at
http://listsearch.blueworld.com/webtensearch.lasso
|
