mbtomh in perl?

2009-09-22 Thread Mishustin Alexey
Hello, Is there a perl tool for converting mbox files to MH directories? Google found only a tool on tcl [1] and a perl tool for converting mbox to Maildir [2]. [1] - http://wiki.tcl.tk/15276 [2] - http://batleth.sapienti-sat.org/projects/mb2md/ If there isn't such a tool 'out of the box', evi

Re: Regexps handle only the first number

2009-09-07 Thread Mishustin Alexey
В Пнд, 07/09/2009 в 15:09 -0400, Shawn H Corey пишет: > > ($raised_num) = 'Tab_22' =~ /^Tab_(.*)$/; > > print $raised_num."\n"; > > Not quite right. Try: > ( $raised_num = 'Tab_22' ) =~ /^Tab_(.*)$/; It's not what I need: $ cat ./test.pl #!/usr/bin/perl use strict; use warnings; my $raised_

Re: Regexps handle only the first number

2009-09-07 Thread Mishustin Alexey
В Пнд, 07/09/2009 в 15:12 -0400, Uri Guttman пишет: > see? wasn't it more fun and educational to discover the answer without > being given it directly? :) Sure! :) -- Regards, Alex -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.o

Re: Regexps handle only the first number

2009-09-07 Thread Mishustin Alexey
В Пнд, 07/09/2009 в 23:01 +0400, Mishustin Alexey пишет: > I give up! > > What's the mystery? Aaaa, ($raised_num) = 'Tab_22' =~ /^Tab_(.*)$/; print $raised_num."\n"; ($raised_num) = 'Tab_23' =~ /^Tab_([0-9]+)$/; print $raised_num."\n"; (

Re: Regexps handle only the first number

2009-09-07 Thread Mishustin Alexey
В Пнд, 07/09/2009 в 14:47 -0400, Uri Guttman пишет: > >>>>> "MA" == Mishustin Alexey writes: > > MA> Why do these regexps handle only the first number? > > > MA> my $raised_num = 'Tab_10' =~ /^Tab_(.*)$/; > MA> print $

Regexps handle only the first number

2009-09-07 Thread Mishustin Alexey
Hello, Why do these regexps handle only the first number? $ cat ./test.pl #!/usr/bin/perl use strict; use warnings; my $raised_num = 'Tab_10' =~ /^Tab_(.*)$/; print $raised_num."\n"; $raised_num = 'Tab_11' =~ /^Tab_([0-9]+)$/; print $raised_num."\n"; $raised_num = 'Tab_12' =~ /^Tab_([0-9][0-

Re: Perl-Tk, copy/paste context-menu for entries

2009-08-09 Thread Mishustin Alexey
8/9/2009, "Shawn H. Corey" вы писали: >Sorry, I don't know any good resources for Perl/Tk. When all else >fails, try perlmonks http://perlmonks.org/ Perlmonks is great! I've already got the answer on my question. Thank you for your advice again. -- Regards, Alex -- To unsubscribe, e-mail: be

Re: Perl-Tk, copy/paste context-menu for entries

2009-08-09 Thread Mishustin Alexey
В Вск, 09/08/2009 в 15:30 -0400, Shawn H. Corey пишет: > Mishustin Alexey wrote: > > В Вск, 09/08/2009 в 07:40 -0400, Shawn H. Corey пишет: > >> Mishustin Alexey wrote: > >>> Hi, > >>> > >>> Another question about Perl-Tk. > >> Try a

Re: Perl-Tk, copy/paste context-menu for entries

2009-08-09 Thread Mishustin Alexey
В Вск, 09/08/2009 в 07:40 -0400, Shawn H. Corey пишет: > Mishustin Alexey wrote: > > Hi, > > > > Another question about Perl-Tk. > > Try asking on the Beginners Perl/Tk list > http://lists.cpan.org/showlist.cgi?name=beginning_perl_tk This mailing list seems to

Re: Perl-Tk, copy/paste context-menu for entries

2009-08-09 Thread Mishustin Alexey
В Вск, 09/08/2009 в 07:40 -0400, Shawn H. Corey пишет: > Mishustin Alexey wrote: > > Hi, > > > > Another question about Perl-Tk. > > Try asking on the Beginners Perl/Tk list > http://lists.cpan.org/showlist.cgi?name=beginning_perl_tk OK, thank you. -- Regard

Perl-Tk, copy/paste context-menu for entries

2009-08-09 Thread Mishustin Alexey
Hi, Another question about Perl-Tk. I need to make context-menus with 'Copy' and 'Paste' commands for 'entry' widgets. I found the following syntax for it. my $popup = $mwindow->Menu( -tearoff=> 0, -menuitems => [ [Button => 'Copy', -command => [

Re: Perl-Tk, horizontal aligning

2009-08-09 Thread Mishustin Alexey
В Сбт, 08/08/2009 в 16:46 -0400, Shawn H. Corey пишет: > Mishustin Alexey wrote: > > Hi, > > > > I have a question about Perl-Tk. > > > > How to align the content of a cell horizontally, for example, to the > > left? > > > &

Perl-Tk, horizontal aligning

2009-08-08 Thread Mishustin Alexey
Hi, I have a question about Perl-Tk. How to align the content of a cell horizontally, for example, to the left? my $where_label = $pane -> Label( -text =>"Please input WHERE arguments" ) ->grid( -row=> 0, -column