Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Системное программирование > работа со строками


Автор: TBD 3.2.2005, 01:47
Привет Перловики.......такой вот вопрос :

Есть строка типа $vv="xxxxx{Привет}ннчннч";

как из этой строки вырезать слово между "{ }" и записать в переменную..




Автор: korob2001 3.2.2005, 04:48
Код

#!/usr/bin/perl -w
use strict;
my $vv = "xxxxx{Привет}ннчннч";
$vv =~ /\{(.*?)\}/;
print $1;

Автор: chaos 3.2.2005, 08:26
можно и так
Код

my $str = "yyyyy{Hello world}sdfdsfsdfs";
$str =~ s/\{(.*?)\}/$1/;
print $str;
smile

Автор: GoodBoy 3.2.2005, 13:43
chaos
Ну и зачем повторять практически дословно чужой код???? smile

Автор: chaos 3.2.2005, 16:26
Цитата(GoodBoy @ 3.2.2005, 13:43)
chaos
Ну и зачем повторять практически дословно чужой код???? smile

это еще один способ

GoodBoy так пойдет

Автор: korob2001 3.2.2005, 16:43
Цитата

это еще один способ

Ты пробовал запустить на выполнение свой способ? Если нет, то попробуй. Твой способ не рабочий, так как ты просто вырезал фигурные скобки, в результате оператор print выводит такую строку: yyyyyHello worldsdfdsfsdfs. Если не понимаешь почему так произошло, то дай знать, поясню.

Автор: GoodBoy 3.2.2005, 17:46
chaos
Это не способ! Это - неверное решение!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)