eAuction
  Not just another Perl script
Google
Welcome, Guest. Please Login or Register


If you use eAuction a lot and like it or if you make money from eAuction or from eAuction-related activities ...
then the project asks you for a donation in favor of the further development.



The forums are protected by
AccessControl
(written by Dieter Werner)
Click here if you want to check your IP against the most important RBLs of the net.
Click here in order to visite the AccessControl forums.


<< Visit the international e Auction Marketplace >>
Buy and sell PC and Consumer Electronic components






  HomeHelpSearchLoginRegister
 



Pages: 1 2 3 4 5 
set charsets for different languages (Read 806 times)
serox
eAuction User
**
Offline

I Love Perl

Posts: 6
Sweden
Gender: male
Re: set charsets for different languages
Reply #9 - 12/05/06 at 21:52:48
 
Thanks for your reply Rasman but I'm not sure where to put

my $desc=&utf($desc);


sub utf {
 my $line=shift;
 $line =~ s/å/&aring;/g;
 $line =~ s/ä/&auml;/g;
 $line =~ s/ö/&ouml;/g;
 $line =~ s/Å/&Aring;/g;
 $line =~ s/Ä/&Auml;/g;
 $line =~ s/Ö/&Ouml;/g;  
 return $line;
}

serox
Back to top
 
 


Advertising
View Profile | WWW   IP Logged
serox
eAuction User
**
Offline

I Love Perl

Posts: 6
Sweden
Gender: male
Re: set charsets for different languages
Reply #10 - 12/09/06 at 12:06:48
 
I give up
Guess it's not possible to run the script with swedish characters.
Have tried everything I can think of.
Everything looks fine but when I do a search or when the script sends email it's not working.

serox
Back to top
 
 


Advertising
View Profile | WWW   IP Logged
Dieter Werner
Administrator
*****
Offline

Dipl. Paranoiac ®

Posts: 1162
Germany
Gender: male
Re: set charsets for different languages
Reply #11 - 12/10/06 at 01:01:59
 
Search the eAuction v1.6.1.x script for
Code:
sub escape_content 



Search the subroutine for the line
Code:
$form{$key} =~ s/([^\s\w.,@%-])/sprintf("&#x%X;", ord($1))/ge; 


and add your special chars there.

Example (ö,Ö,ü,Ü):
Code:
$form{$key} =~ s/([^\s\w.,@%öÖüÜ-])/sprintf("&#x%X;", ord($1))/ge; 


Don't change the position of the hyphen (-) it must be the last one!!!

Back to top
 
 

Multimedia file viewing and clickable links are available for registered members only!!  You need to Login or Register!!


Greetings from Germany
Dieter Werner




Advertising
View Profile | WWW   IP Logged
Pages: 1 2 3 4 5 


If you like eAuction, please Rate it.
If you don't like eAuction, please Rate it too.


1 is being poor and 10 is being excellent


EveryScript

ip-location


AccessControl - Members Only