Forums Index > Mewsoft Products > Auctionawy > VisualEditor.cgi
ehammer First Post Posted on: 06-01-08 05:04 PM
VisualEditor.cgi
Hi All,

I keep getting the following error when trying to use the visual HTML editor as a seller - however its does show on the admin side of the software but always brings up a white screen with nothing to edit. Anyone had the same problem ?. The error that keeps on coming up is :-

Software error:
Missing right curly or square bracket at VisualEditor.cgi line 99, at end of line syntax error at VisualEditor.cgi line 99, at EOF
Execution of VisualEditor.cgi aborted due to compilation errors.

Any help would be apperciated.

Ben
Anonymous Reply #: 1 Posted on: 06-01-08 05:10 PM
Re: VisualEditor.cgi
edited
ehammer Reply #: 2 Posted on: 06-01-08 07:00 PM
Re: VisualEditor.cgi
HI !,

Thanks for the advice, but I have checked the file over and there is a } at the end of the file (see below). big grin The question regarding the edit, I think its the ONLY file I have not edited embarrasmentops: . Anyway the .cgi file code is below for your viewing, can you let me know if its different to yours ! - ta in advance.

Ben

#!/usr/bin/perl
#!C:\perl\bin\perl.exe
=Copyright Infomation
==========================================================
Program Name : Mewsoft NetAuction
Program Version : 6.00
Program Author : Elsheshtawy, A. A.
Home Page : http://www.mewsoft.com
Copyrights © 2001-2004 Mewsoft Corporation. All rights reserved.
==========================================================
=cut
#==========================================================
$| = 1;
#print "Content-type: text/html ";
use CGI::Carp qw(fatalsToBrowser);
#==========================================================
BEGIN {
undef %Param;
undef %Global;
undef @User_Fields;
undef @Links_Fields;
undef @Category_Fields;
undef %Cookies;
undef %License_Keys;
}
#==========================================================
BEGIN {
unshift @INC, ".";
$0 = $^X unless ($^X =~ m%(^|[/\\])(perl)|(perl.exe)$%i);
$Cwd = ".";
if ($0 =~ m%^(.*)[/\\]%){$Cwd=$1; unshift @INC, $Cwd;};
if (!open (PATH, "$Cwd/data/startup.ini")){
if (!open (PATH, "./data/startup.ini")){
die "can not open path file $Cwd/data/startup.ini or ./data/startup.ini: $!. Please make sure the directory data and all its subdirectories and files are writables.";
}
}
@Config = <PATH>;
close (PATH);
foreach $Temp(@Config) {
$Temp =~ s/ ? $//;
$Temp =~ s/^\s+//;
if (!$Temp || $Temp =~ /^\#/) {next;}
($K, $V) = split('=', $Temp);
$Global{$K} = $V;
}
if (! $Global{CGI_Dir}) {
$0 = $^X unless ($^X =~ m%(^|[/\\])(perl)|(perl.exe)$%i);
if ($0 =~ m%^(.*)[/\\]%){$Global{CGI_Dir}=$1};
if (!-d $Global{CGI_Dir}) {
$Global{CGI_Dir} = "";
$Temp = $ENV{SCRIPT_FILENAME};
@Temp = split (/[\/\\]/, $Temp);
pop @Temp;
$Temp = join ('/', @Temp);
if (-d $Temp) {$Global{CGI_Dir}=$Temp;}
}
$Global{CGI_Dir} ||= ".";
}
$Global{CGI_Dir} =~ s/\\/\//g;
if (!$Global{Visual_Editor_Prog}) {
$0 = $^X unless ($^X =~ m%(^|[/\\])(perl)|(perl.exe)$%i);
$0 =~ m%^(.*)[/\\](.*)%;
$Global{Visual_Editor_Prog} = $2;
$Global{Visual_Editor_Prog} ||= undef;
}
if (!$Global{CGI_URL}) {
$http = "http://"; $Domain = ""; $Script_URL = "";
if ($ENV{HTTP_REFERER}) {if ($ENV{HTTP_REFERER} =~ m|^https://|i) {$http = "https://";}}
if ($ENV{HTTP_HOST}) {$Domain = $http . $ENV{HTTP_HOST};}
if ($ENV{SCRIPT_NAME}) {$Script_URL = $Domain . $ENV{SCRIPT_NAME};}
@Temp = split (/[\/\\]/, $Script_URL);
pop @Temp;
$Global{CGI_URL} = join ('/', @Temp);
}
unshift @INC, $Global{CGI_Dir};
}
use configuration;
use startup;
#==========================================================
&Program_Start;
$Script_URL = "$Global{CGI_URL}/$Global{Visual_Editor_Prog}";
$Script_URL = &Get_Script_URL;
#==========================================================
&Visual_Editor();
exit 0;
#==========================================================
sub Visual_Editor{
my($Template);

#&Read_Language_File($Global{Language_Sell_File})
sub Visual_Editor{
my($Template);

#&Read_Language_File($Global{Language_Sell_File});
$Template = &Translate_File($Global{Visual_Editor_Template});

&Display($Template, 1);
}
#==========================================================
mewsoft Reply #: 3 Posted on: 06-01-08 07:09 PM
Re: VisualEditor.cgi
You may need to transfer it in ASCII mode only

Mewsoft Support
www.mewsoft.com
Anonymous Reply #: 4 Posted on: 06-01-08 07:11 PM
Re: VisualEditor.cgi
edited
ehammer Reply #: 5 Posted on: 06-01-08 07:13 PM
Re: VisualEditor.cgi
Hi Mewsoft,

I am pleased to say that my ftp proggy is setup to transfer it in Ascii, but it is set with the permission 755 !.

Ben
Anonymous Reply #: 6 Posted on: 06-01-08 07:19 PM
Re: VisualEditor.cgi
edited
ehammer Reply #: 7 Posted on: 06-01-08 07:21 PM
Re: VisualEditor.cgi
HI Wanna,

I tried that , and the bottom code of that files now looks like :-

#==========================================================
&Program_Start;
$Script_URL = "$Global{CGI_URL}/$Global{Visual_Editor_Prog}";
$Script_URL = &Get_Script_URL;
#==========================================================
&Visual_Editor();
exit 0;
#==========================================================
sub Visual_Editor{
my($Template);

#&Read_Language_File($Global{Language_Sell_File});
$Template = &Translate_File($Global{Visual_Editor_Template});

&Display($Template, 1);
}
#==========================================================

The editor displays without any problem but you cant select a colour or txt type more than once as the option just fades out, and prevents you from using it all then.

Thanks for the help so far though, and more ideas ?

Ben
Anonymous Reply #: 8 Posted on: 06-01-08 07:24 PM
Re: VisualEditor.cgi
edited
ehammer Reply #: 9 Posted on: 06-01-08 07:28 PM
Re: VisualEditor.cgi
Wanna,

THANKS !!!!!!!!! yep you are right, all sorted now, and THANKS again for your valued help !, perhaps you should work for Mewsoft as Tech Support !.

Cheers again

Ben
Anonymous Reply #: 10 Posted on: 06-01-08 07:29 PM
Re: VisualEditor.cgi
edited