in reply to Break HTML table output into two or three columns

Do you want to change it both for when the quiz is set up i.e. on the admin page AND on the page the student sees ?.That would be here 

ANS: # line 2649
foreach $ans (@ans){
  $ans =~ s/^\s+//g; $ans =~ s/\s+$//g;
  $ans2 = &repipe($ans);
  if($ans ne "" && $ans2 =~ /^%SAQ%/){
    print "<input type=text name=$num value=\"$data{$num}\"><br>\n";
    last ANS;
  }
  elsif($ans ne "" && $ans2 =~ /^%SAT%/){
     print "<textarea name=$num rows=5 cols=40>$data{$num}</textarea><
+br>\n";
     last ANS
  }
  elsif($ans ne "") {
    if($esc_num eq $ans){ $ck = " CHECKED";}
    else{ $ck = ""; }
    print "<input type=radio name=$num value=\"$ans\"$ck>$ans2<br>\n";
  } 
}

[download]
poj

Replies are listed 'Best First'.
Re^2: Break HTML table output into two or three columns
by Anonymous Monk on Feb 14, 2017 at 14:30 UTC
    Hi,

    Well, I think the best course of action would be to offer you fifty dollars to post a working version of the script. That way, there is no possibility that some slight difference in the way your server and my server handles the script is at fault where breaking is concerned.

    I can find the exact line-number, and recognize all sorts of things that might break the script, such as smart quotes and binary uploads, and even things I can't verbalize, but I can't tell if the code is actually going to pass through Site5 anti-hacking filters. If you want to try it on your server, that's fine; if you want to try it on my server, I will make you a folder to work in. Thank you, again!

    Jagtig

[reply]

      As far as I can see there are 3 places that need editing. The 'edit' page that you identified around lines 1370-1423 (54 lines) but also the 'add' page at lines 3658-3679 (22 lines) and the 'view' page at 2650-2666 (17 lines). The question was do you want to change all these pages or just the view. The view page is relatively simple and with a little guidance you should be able to do that yourself.

      poj
[reply]
        Hello, poj!

        Okay, I really can't handle the programming. Not to tire you, but though the script is going to be at the center of my site, I have spent no time studying PERL, and it is the fastest to break in Site5. Site5 is the fastest thing in the cloud, so it's likely they've reduced flexibility and shortened paths to achieve that speed.

        In other words, "Pow!" The script is broken with just a touch of the keyboard.

        Will you venture to name a price that would commit you for a greater or shorter length of time to a working solution? I would be happy to supply you with a site on my server to work on the script

        If you are not in need, then perhaps you will forego. However, the money could buy you an evening at a decent pub, as well.

        Thank you for your kind consideration.

        Jagtig

[reply]
        No, I'm really too busy, and have zero mistake work in front of me. Can't stretch the brain and try things. If you want to make me an offer, including something to make the email sender programmable with a subject line as well as an email (to send scores and subject line to the quizmaster), I do have some money for that; not a lot, but around a hundred dollars. If the work amuses you, then no deadline, just workable version, and the money's yours. Thanks again, for everything. jagtig
[reply]
        I should be, but I can't (do the programming). If fifty isn't enough, how much is this job worth?
[reply]
[reply]
        Well, what is the job worth? I have saved up a little extra this past month. Can the job be done, at all? Is money actually the only consideration, or obstacle to solving the problem?
[reply]

In Section Seekers of Perl Wisdom