Здравствуйте!
У меня есть такое вот регулярное выражение:

То есть любой символ из A-Z или a-z превращается в [A-Z], а любой символ из 0-9 превращается в [0-9].
Как это сделать в одну строчку? Заранее спасибо.

Или, еще короче



Это сообщение отредактировал(а) Logo - 15.10.2010, 12:57

Спасибо.

Никак не могу найти как это сделать с помощью регулярного выражения:
удалить первый символ из строки, если он равен А.

Вопрос неактуален. 
Всем спасибо.

Цикл здесь лишний:

Я недавно начал писать углублённые статьи по Perl регулярным выражениям, в основном по своей книжке по Perl regex, и отвечаю на интересные вопросы.

Сергей

Прогоните на любом тексте ваш код, и увидите, чем отличается результат.

Ой, верно, я неправильно понял условие этой странной задачки... Тогда без вставки кода не обойтись:

Ага. Но мой код все равно короче.

Да, экономия 11 байтов. :-) А я в книгах по Перлу не видел конструкции типа <A-Z 0-9> и не читал о том, как она работает.

См. задачу ТС, его цель сделать как можно короче, однострочник.


http://perldoc.perl.org/perlop.html#I/O-Operators

Конструкция <A-Z 0-9> хоть и работает (удивительно), но мягко говоря "не в тему". Тут скорее qw(A-Z 0-9) должно быть.

Ни чего удивительного. <> В этом случае работает как файловые шаблоны. Т.к. спец символы не используются, он просто возвращает список строк.
qw(A-Z 0-9) тут не дает выигрыша, даже наоборот

Денежный выигрыш?)

Ты что :o. Азартные игры запрещены. Чисто моральный;)

Добавлено через 1 минуту
ПРОФИТ!

uc($string)
s/.+/uc($1)/eg;

;)

Забыл сказать, изначально это был стеб. У ТС уже есть максимально простой способ сделать это, он же и самый быстрый.
Все, что ниже, применять за переделами perlgolf от лукавого есть. Короче по набору символов или строк != проще и понятней.
Поэтому правильный ответ на "Упрощение регулярного выражения" - никак, тут и так максмально просто.
На "Как это сделать в одну строчку" -


Ну, можно воспользоватся синтаксическим сахаром - украшательством


или



суть от этого не меняется.