- remove non useful non-ascii characters

- add "use utf8" for useful utf8 characters

9 files changed, 21 insertions, 9 deletions

diff --git a/perl-install/share/advertising/05.pl b/perl-install/share/advertising/05.pl
index f527b58e7..e2017969d 100644
--- a/perl-install/share/advertising/05.pl
+++ b/perl-install/share/advertising/05.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
diff --git a/perl-install/share/advertising/10.pl b/perl-install/share/advertising/10.pl
index 4c444457e..a59f1d206 100644
--- a/perl-install/share/advertising/10.pl
+++ b/perl-install/share/advertising/10.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
@@ -14,4 +16,4 @@ $border = 10;  #- for leftish text
 	' ',
 	N("Mandrakesoft has developed two products that allow you to use Mandrakelinux <b>on any computer</b> and without any need to actually install it:"),
 	N("	* <b>Move</b>, a Mandrakelinux distribution that runs entirely from a bootable CD-ROM."),
-	N("	* <b>GlobeTrotter</b>, a Mandrakelinux distribution pre-installed on the ultra-compact “LaCie Mobile Hard Drive”."));
\ No newline at end of file
+	N("	* <b>GlobeTrotter</b>, a Mandrakelinux distribution pre-installed on the ultra-compact “LaCie Mobile Hard Drive”."));
diff --git a/perl-install/share/advertising/14.pl b/perl-install/share/advertising/14.pl
index a46e1ff84..c886c1094 100644
--- a/perl-install/share/advertising/14.pl
+++ b/perl-install/share/advertising/14.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
@@ -16,4 +18,4 @@ $border = 10;  #- for leftish text
 	' ',
 	N("It is a <b>full-featured office suite</b> that includes word processor, spreadsheet, presentation and drawing applications."),
 	' ',
-	N("OpenOffice.org can read and write most types of <b>Microsoft® Office</b> documents such as Word, Excel and PowerPoint® files."));
\ No newline at end of file
+	N("OpenOffice.org can read and write most types of <b>Microsoft® Office</b> documents such as Word, Excel and PowerPoint® files."));
diff --git a/perl-install/share/advertising/21.pl b/perl-install/share/advertising/21.pl
index a9961b402..6bbc66812 100644
--- a/perl-install/share/advertising/21.pl
+++ b/perl-install/share/advertising/21.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
@@ -20,4 +22,4 @@ $border = 10;  #- for leftish text
 	N("	* Scripting languages:"),
 	N("		* <b>Perl</b>"),
 	N("		* <b>Python</b>"),
-	N("	* And many more."));
\ No newline at end of file
+	N("	* And many more."));
diff --git a/perl-install/share/advertising/22.pl b/perl-install/share/advertising/22.pl
index 18d0ee371..450ded214 100644
--- a/perl-install/share/advertising/22.pl
+++ b/perl-install/share/advertising/22.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
@@ -14,4 +16,4 @@ $border = 10;  #- for leftish text
 	' ',
 	N("PowerPack gives you the best tools to <b>develop</b> your own applications."),
 	' ',
-	N("With the powerful integrated development environment <b>KDevelop</b> and the leading Linux compiler <b>GCC</b>, you will be able to create applications in <b>many different languages</b> (C, C++, Java™, Perl, Python, etc.)."));
\ No newline at end of file
+	N("With the powerful integrated development environment <b>KDevelop</b> and the leading Linux compiler <b>GCC</b>, you will be able to create applications in <b>many different languages</b> (C, C++, Java™, Perl, Python, etc.)."));
diff --git a/perl-install/share/advertising/24.pl b/perl-install/share/advertising/24.pl
index b09429d75..075b90d1b 100644
--- a/perl-install/share/advertising/24.pl
+++ b/perl-install/share/advertising/24.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
@@ -18,4 +20,4 @@ $border = 10;  #- for leftish text
 	N("	* <b>MySQL</b> and <b>PostgreSQL</b>: The world's most popular open source databases."),
 	N("	* <b>CVS</b>: Concurrent Versions System, the dominant open source network-transparent version control system."),
 	N("	* <b>ProFTPD</b>: The highly configurable GPL-licensed FTP server software."),
-	N("	* <b>Postfix</b> and <b>Sendmail</b>: The popular and powerful mail servers."));
\ No newline at end of file
+	N("	* <b>Postfix</b> and <b>Sendmail</b>: The popular and powerful mail servers."));
diff --git a/perl-install/share/advertising/28.pl b/perl-install/share/advertising/28.pl
index f688cd2e7..cce312594 100644
--- a/perl-install/share/advertising/28.pl
+++ b/perl-install/share/advertising/28.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+use utf8;
+
 $width = 556;
 $height = 303;
 
@@ -19,4 +21,4 @@ $border = 10;  #- for leftish text
 	N("	* Access to <b>commercial applications</b> (for example to NVIDIA® or ATI™ drivers)."),
 	N("	* Participation in Mandrakelinux <b>user forums</b>."),
 	N("	* <b>Early and privileged access</b>, before public release, to Mandrakelinux <b>ISO images</b>."),
-	N("	* And many more."));
\ No newline at end of file
+	N("	* And many more."));
diff --git a/perl-install/standalone/drakpxe b/perl-install/standalone/drakpxe
index 5e374faff..d6e37c1ed 100755
--- a/perl-install/standalone/drakpxe
+++ b/perl-install/standalone/drakpxe
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# Fran�ois Pons <fpons@mandrakesoft.com>
+# Fran,cois Pons <fpons@mandrakesoft.com>
 #
 # Copyright 2003-2004 Mandrakesoft
 #
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index 072b593b6..7b0d9ea81 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -290,7 +290,6 @@ sub set_scale_values() {
 
 #- Desc  => check if this theme is available in the current resolution else
 #-	    change the current resolution or display a ask_warn box
-#- Args  => �
 #- return=> (bool)
 sub thm_in_this_res {
   my ($check_res) = @_;
@@ -311,7 +310,6 @@ sub which_res_exist() {
 }	
 
 #- Desc  => retrieve all installed theme
-#- Args  => �
 #- Return=> @arr of available theme
 sub giv_exist_thm() {
   chdir($thm_path);