rulinux.net - Форум - Development - Re:Как сделать такое в перле?

Re:Как сделать такое в перле?

Fri, 03 Jul 2009 07:06:04 +0400

тогда тебе либо модуль писать, и потом его юзать use MyCoolModule и из него вызывать функцию, либо править исходники перла. Вообще довольно странно твое желание, в перле можно сделать практически все, используя стандартные функции.

Re:Как сделать такое в перле?

Fri, 03 Jul 2009 06:27:42 +0400

Или просто заюзать оператор ~~ Я хочу не просто сделать поиск, а сделать его именоо в указанном мной синтаксисе.

Re:Как сделать такое в перле?

Fri, 03 Jul 2009 04:30:46 +0400

> if ($elem in @array) {...}

иными словами ты хочешь без прохода по массиву сказать да, если элемент существует и выполнить какойто кусок кода?

Если это так, то выполнить поиск элемента без прохода по нему можно через хеш.

if (exists $hash{$elem}) { ... } где массивом будут ключи хеша, хеш там так устроен, что перебор делает гдето вовнутренностях перла.

Re:Как сделать такое в перле?

Thu, 02 Jul 2009 22:46:13 +0400

перла не знаю, боюсь ошибиться, но подозреваю что в твоём примере if - не функция. Видимо "print ... if ..." - встроенный оператор с жёстко заданным синтаксисом.

Re:Как сделать такое в перле?

Thu, 02 Jul 2009 21:33:31 +0400

Например, хочу написать функцию in, которая понимает такой синтаксис:

if ($elem in @array) {...}

Re:Как сделать такое в перле?

Thu, 02 Jul 2009 16:17:34 +0400

не очень понял что надо?

если надо вызвать функцию, если аргумент существует(например файл) то как-то так:

func ($arg) if -f $arg;
sub func{
print "file $_[0] существует "
}

Re:Как сделать такое в перле?

Wed, 01 Jul 2009 20:37:37 +0400

Нет, помимо print'а может быть любой иной оператор. Это именно if так интерпретируется.

Как сделать такое в перле?

Wed, 01 Jul 2009 20:37:37 +0400

Хочу функцию, которая будет принимать аргументы, идущие в коде до имени самой функции, аналогично if, foreach и т.п., например:

print 'test' if 1;

if принял аргумент, идущий до самой функции.