Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Как купить рекламу на форуме


Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail


Ответ
 
Опции темы Поиск в этой теме
Старый 09.11.2017, 01:31   #1
Maxis10
Новичок
Джуниор
 
Регистрация: 08.11.2017
Сообщений: 2
Вопрос Perl задачи. Перевод буквы в верхний регистр. Как сделать так, чтобы переводил буквы в верхний регистр после точки, восклицательного знака,вопросительного знака?

Есть код на языке Perl. Переводит буквы в верхний регистр. Как сделать так, чтобы переводил буквы в верхний регистр после точки, восклиц.знака,вопросительного знака? Использовал регулярные выражения.
Код:
open (FILE, "in.txt");
@var = <FILE>;
open (FILE1, ">out.txt");
$size = @var;
for($i = 0; $i < $size; $i++)
{
	@A = split ("//", $var[$i]);
	$t = $var[$i];


	$t=~tr/(?:!:.)[a-z]/[A-Z]/;
	
	print FILE1 $t;
}

close FILE;
close FILE1;
Maxis10 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме 20000 рублей в месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
верхний регистр строки делфи BAMbarBIO Компоненты Delphi 9 21.06.2011 18:10
Ввод с клавиатуры,верхний и нижний регистр Forever_young Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 8 11.11.2009 23:27
Как в lable задать степень (нижний и верхний регистр) Polotenchik Общие вопросы Delphi 17 17.07.2009 22:30
Перевод имени в верхний регистр MalCer Общие вопросы Delphi 6 31.03.2009 12:14
Используя типизированную константу множество преоброзовать все маленькие русские буквы в верхний регистр VITIY Паскаль, Turbo Pascal, PascalABC.NET 20 21.11.2008 19:16


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS