ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Igor Nikolaev                        2:5030/266     26 Feb 2002  07:59:49
 To : "Alex W"
 Subject : Re: Помогите чайнику!
 -------------------------------------------------------------------------------- 
 

 Alex W <Alex@mspm.ru> wrote:
 
 > В тексте скрипта просто "print"Hello Word"
 > Открывается страничка вверху которой написано "Hello Word"
 > Мне надо, что-бы она была конкретного размера, а не во весь экран. Можно ли
 
 Что-нибудь такое?
 
 #!/usr/bin/perl -w
 use strict;
 #
 # Обрезает страничку по ширине и длине
 # cut.pl page_length page_width < page
 # 
 my $cnt = 0;
 while ( <STDIN> ) {
   exit if defined $ARGV[1] and $cnt++ == $ARGV[1];
   chomp ( $_ = substr $_, 0, $ARGV[0] );
   print "$_\n";
 }
 
 -- 
 И
 --- ifmail v.2.12.os.sensi
  * Origin: Вы этого хотели? Вот вам! (2:5030/266@fidonet)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор