Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Perl: tk question
Top Forums Shell Programming and Scripting Perl: tk question Post 37760 by RTM on Friday 27th of June 2003 01:24:13 PM
Old 06-27-2003
To replace the default icon - see the Perl/Tk FAQ

As far as your other question - you would have to post your code since

1. No one else has responded.
2. I only started looking at Perl/tk because of your question
3. The one example script I tried only brought up the one window it was suppose to which makes me think you have coded the window you don't want.

Some of the other entries in the FAQ may help to solve your problem but I don't know since I don't know your code.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Question about Perl

Where can i find solid information about programming in Perl? Thank you in advance!!!:) (5 Replies)
Discussion started by: SolidSnake
5 Replies

2. Shell Programming and Scripting

perl question

If I use 2 system commands in a script, will one finish before the next one starts? or will it start the first and the second at the same time? i.e. system("ps | grep rminer"); system("ls -al | grep 431"); (1 Reply)
Discussion started by: BG_JrAdmin
1 Replies

3. Shell Programming and Scripting

PERL question

Hello, pkzipc of a certain zip file yeilds the following in shell PKZIP(R) Version 6.0 FAST! Compression Utility for AIX Copyright 1989-2002 PKWARE Inc. All Rights Reserved. Registered Version PKZIP Reg. U.S. Pat. and Tm. Off. Patent No. 5,051,745 Viewing .ZIP: test.zip Length... (13 Replies)
Discussion started by: jerardfjay
13 Replies

4. Shell Programming and Scripting

another perl question

I copy and paste from the book but this thing is not working. I cannot figure out what is wrong with myline 9.. can someone please tell me # cat ./sort4.pl #!/usr/bin/perl -w use strict; use warnings; my $input = shift; my $output = shift; open(IN, '<', $input) or die... (4 Replies)
Discussion started by: hankooknara
4 Replies

5. Shell Programming and Scripting

Perl question regarding [ ]

Below program, I do not get why item I am looking for is , instead of . When I do $#text, i get the right value for $value1, but when I do , i get somsething4, instead of somsethingxxxxxxxxxxxxxxxxxxx(which is what I am looking for. when I do , I get empty.. why? what did I do wrong? can you... (2 Replies)
Discussion started by: hankooknara
2 Replies

6. Shell Programming and Scripting

another perl question

I fail to see how below answer is 1? can someone explain this for me? DB<3> $string = "The cat sat on the mat"; DB<4> $animal = ($string =~ m/The (.*) sat/); DB<5> print $animal; 1 (2 Replies)
Discussion started by: hankooknara
2 Replies

7. Shell Programming and Scripting

another perl question

I have a question regarding bulding a hash from a file which has below pattern I thought I could write something like this but clearly my syntax is way off $/ = "\n\n"; $" = "\n"; open(FILE, file1) || die; my %keymaster = ( ); while (<FILE>) { my $topinfo =~... (5 Replies)
Discussion started by: hankooknara
5 Replies

8. Shell Programming and Scripting

PERL Question ...

I am reading a file in perl script .. during the debug the $linein value is : linein : +ASM1,sys,||¬ |3Æqúoü;”ט|| from this line I am getting the tmepuser and password from above : ($tmpuser, $pwd) = ($linein =~ /^$server\s*,\s*(+)\s*,\|\|(.+)\|\|/sm); I am getting $tmpuser and... (2 Replies)
Discussion started by: talashil
2 Replies

9. Shell Programming and Scripting

Perl Question

Hello all, I have the following line: xxx|xxxx|xxxx|xxx.xx|xxx And i insert the values in an array. I am trying to find out if the field of the array (where field=xxx.xx) has the '.' character. I am using the code below but it doesn't seem to work. if($field=~ /./) { ... (3 Replies)
Discussion started by: chriss_58
3 Replies

10. Shell Programming and Scripting

Perl question about

Hello everybody, I am new at the forum and a total newbie when it comes to Unix. I am trying to see how I can add the ability to kill a user's processes? I want to add this to my Shel Script Add the code/process into a subroutine. Also, I would like to use an array to store the list... (0 Replies)
Discussion started by: kinelisch
0 Replies

LEARN ABOUT OSX

perlko5.12

PERLKO(1)						 Perl Programmers Reference Guide						 PERLKO(1)

NAME

       perlko - PerlX XXX XXX

DESCRIPTION

       PerlX XXX XX XX XXXXX !

       PerlX 5.8.0XXX XXXX/ISO 10646X XX XXXX XXX XXX.	XXXX XXX XXXX XXXX XXX XX XXXX XXXX XXX XX XXX XXX XX XXX XX XXX XXXX XXXXX.  XXXXX X XXXX
       XXX XX XXX XX XX XX - XXX XX XXX, XX XXX, XXX XXX, XXX XX XXXX XXX XX XXXX, XX XX, XXX XX, XXXX XX, XXXX XX, XXXX XX, XX XXXX XX XX X-X
       XXXX XX XXX XX XX XXX XXX XXX  X XX X XX XXX XX XXX XXX XX XXX XXXX X X XX XX XXX XXXX  XX XX XXXX XXXX XX XX XX XX XXX	XXXX XXXX.

       PerlX XXXXX XXXXX XX XXX XX XXXXX. XX XXXXX XXX Perl XXXX XXX  UTF-8 XXXX X X XX, XX XXX XXX(XX XX, XXX, index, substr)X XXX XX XX XXXX XX
       XXX XXXXX. (X XXX XX perlunicode XXXX XXXXXX.) XXXXX XX XXXX XX XX XXX XXX, XXX XX XXX XX XX/X XXX XXXXX XXXX XX XX XXXXX X XXXX XXX XXX XX
       XX XX 'Encode'X	XXXXX. XXXX 'Encode'X  XX XXX XXX XXX XXX XX X X XXXX.

       'Encode'X XXX XX XXX XXXX XXXXX.

       euc-kr
	     US-ASCIIX KS X 1001X XX XX XXXXX XXX (XX XXXXXX
	     XX.) KS X 2901X RFC 1557 XX.

       cp949
		   MS-Windows 9x/MEXX XXX XX XXX.  euc-krX 8,822XX
		   XX XXX XX XX.  aliasX uhc, windows-949, x-windows-949,
		   ks_c_5601-1987. X XXX XXX XXXX XX XXXXX, Microsoft
		   XXXX CP949X XXX XXX XX.

       johab
		   KS X 1001:1998 XX 3XX XXX XXX.  XX XXXXX cp949X
		   XXXXX US-ASCIIX  KS X 1001X 8,822XX XX XXX XX XX.
		   XXX XXX XX XX.

       iso-2022-kr
		   RFC 1557XX XXX XXX XXX XX XXX XXXXX US-ASCIIX
		   KS X 1001X XXXXX XX XXX euc-krX XXX XXX XXX XX.
		   1997-8X XXX XXXX X XX XX XXX XXX XX.

       ksc5601-raw
		   KS X 1001(KS C 5601)X GL(X, MSBX 0XX X XX) X XXX XX
		   XXX. US-ASCIIX XXXX XX XXXX XXX XX X11 XXX XX
		   XXX (ksc5601.1987-0. '0'X GLX XXX.)XX XXX XX XXXXX
		   XX XX. KS C 5601X 1997X KS X 1001X XXX XXXX.  1998XXX  X
		   XX (XXX XXX XX XX XX)X XXXX.

	X XX XX XXX XXX XXXX.

       XX XX, euc-kr XXXXX X XXX UTF-8X XXXXX XXX XX XX XXX.

	   perl -Mencoding=euc-kr,STDOUT,utf8 -pe1  < file.euckr > file.utf8

       XXXX XXX XX X X XXXX.

	   perl -Mencoding=utf8,STDOUT,euc-kr -pe1  < file.utf8  > file.euckr

	 XX XXX XX XXXX X X XXX Encode XXX XX
       XXXX PerlXX XX piconvX PerlX XX XXXX.
       X XXXX X X XXX piconvX UnixX XX iconvX
       XXX X XXXX. X XXXX XXX XXXX.

	  piconv -f euc-kr -t utf8 < file.euckr > file.utf8
	  piconv -f utf8 -t euc-kr < file.utf8 > file.euckr

	 X, 'PerlIO::encoding' XXX XX XXX XXXX XXX XX XX
       (XXX XXX XXX) XXX XX X X XXXX.

	 #!/path/to/perl

	 use encoding 'euc-kr', STDIN => 'euc-kr',
				STDOUT-> 'euc-kr', STDERR=>'euc-kr';

	 print length("XX");	    # 2  (X XXXX XX XX XXX XX)
	 print length('XX');	    # 4  (XX XXXX XXX XX XXX XX)
	 print index("XX, XXX", "X");	# -1 ('X'X XX)
	 print index('XX, XXX', 'X');	# 7 (8XXX 9XX XXXX 'X'X
						   XXXX XXX.)

   X XXX XX XXX...
	 PerlX XXXX  XXX XXX XXX XX XX XX, X XXX XX
       Perl XX X XXX XXXX XX, EncodeX XXX XX XX XX
       XX X XXXX.  XX X XXX XX XX XXX XX XXXX.

   Perl XX XX
       XXX XXX	XX XXX XXX XX XXX XXXX. X XXX XX XXX XX XXX XX XXXX XX XX XXXX.

       <http://www.perl.com/>
	      O'ReillyX Perl X XXX

       <http://www.cpan.org/>
		   Comprehensive Perl Archive Network

       <http://lists.perl.org/>
	     Perl XXX XXX. XX XXX XXX
	     perl-unicodeXX 'Encode'X XX XXX.

   PerlX X XX XXXXX XXX X X XX XXX XX XXX
       <http://www.perl.or.kr/>
	     Perl XX XXX XX

       <news:han.comp.lang.perl/>
	     XXX Perl XX XX

       <http://www.hanb.co.kr/search/searchResult.php?keyword=perl>
	     O'ReillyXX XX XXX Perl XX XX

       <http://www.perlschool.net/>
	     Perl XX XX X XX, XX XX, XX XX XXX XX

       <http://www.perl.co.kr>
	     PerlX XXX CGI, DB, XX XX XX  XX X XX XX

   XXXX X XXX XXX XX XX
       <http://www.unicode.org/>
	     XXXX XXXX.

       <http://std.dkuug.dk/JTC1/SC2/WG2>
	   XXXXX UnicodeX XX ISO XXX  ISO/IEC 10646 UCS(Universal Character Set)X XXX  ISO/IEC JTC1/SC2/WG2X X XXX.

       <http://www.cl.cam.ac.uk/~mgk25/unicode.html>
	     XXX/XXXXX XXXXX UTF-8 XXX XX XXX(FAQ)

       http://kldp.org/Translations/html/UTF8-Unicode-KLDP/UTF8-Unicode-KLDP.html <http://kldp.org/Translations/html/UTF8-Unicode-
       KLDP/UTF8-Unicode-KLDP.html>
	     XXX/XXXXX XXXXX UTF-8 XXX XX XXX(FAQ)X  XXX XX

SEE ALSO

       Encode, Encode::KR, encoding, perluniintro, perlunicode

AUTHORS

       Jarkko Hietaniemi <jhi@iki.fi> XXX <jshin@mailaps.org>

perl v5.12.5							    2012-11-03								 PERLKO(1)
All times are GMT -4. The time now is 02:12 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy