Функции в Perl, Perl, статии, програмиране - Програмиране C, Delphi, C #

chomp (низ), chomp (масив) използва стойността на специалната променлива $/за последния символ на низ или всеки елемент от масив. Последният знак ще бъде премахнат само ако е равен на стойността на $ /.

котлет (низ), котлет (масив) прави същото като предишната функция, но в резултат на това тази функция връща самия изтрит знак.

chr (номер) връща символ от таблицата ASCII с кодовия номер. Например chr (65) ще върне символа „A“.

крипта (низ1, низ2) криптира низ string1. Perl не предоставя механизми за дешифриране на низ.

индекс (низ, подниз, позиция) връща позицията на първото появяване на подниз в низ, започвайки от позиция. Ако параметърът на позицията не е посочен, тогава низовете се сравняват от началото на низа.

присъединяване (низ, масив) връща низ, в който всички елементи на масива са свързани с низ. Например, join (">>", ("a", "b", "c")) ще върне низа "a >> b >> c";

lc (низ) ще върне низ, където всички символи са главни. Например lc ("ABCD") ще върне "abcd"

lcfirst (низ) ще върне низ само с главни букви на първия символ. Например, lcfirst ("ABCD") ще върне "aBCD"

дължина (низ) връща дължината на низа.

rindex (низ, подниз, позиция) същото като индекса (виж по-горе), но връща позицията на последното появяване.

разделяне (шаблон, низ, ограничение) разделя низа на части, като приема стойността на параметъра на шаблона като граница. Например, ($ a, $ b, $ c) = split (":", "1: 2: 3") ще присвои на променливите $ a, $ b, $ c стойностите "1", "2", "3" съответно. Ако резултатът се използва в скаларен контекст, тогава функцията връща броя на елементите, намерени по този начин.

substr (низ, отместване, дължина) връща частта от низа, както е дефинирана от параметрите на изместване и дължина. Ако дължината не е посочена, се връща всичко между отместването и края на низа. Отрицателните отмествания могат да се използват за сканиране от десния край на низа.

uc (низ) същото като lc (виж по-горе), но всички главни букви.

ucfirst (низ) същото като lcfirst (виж по-горе), но с главни букви.

В случай, че Perl срещне число, където очаква низ, той просто преобразува числото в низ, освобождавайки ви от допълнителната работа.

Някои от функциите по-горе използват специалната променлива $ _ за работа, за която ще научите в Глава 9 Файлове и Глава 12 Използване на специални променливи.

Следващите няколко примера демонстрират използването на някои от низовите функции. След като разберете как работят няколко низови функции, можете да приложите останалите правилно.

Пример: промяна на стойността на низ

Много често може да се наложи да смените части от линии - обикновено някъде в средата на линията. Когато се сблъскате с такава задача, можете да използвате функцията substr (). Обикновено тази функция се използва за получаване на низ от съществуващ низ - въз основа на три параметъра - оригиналния низ, изместването, което е началото на новия ред и дължината на новия ред.

$ firstVar = substr ("0123BBB789", 4, 3);
print ("firstVar = $ firstVar \ n");

Програмата ще отпечата:

Функцията ще върне низ, започващ от 5-ти знак и дълъг 3 знака.

Използването на тази функция става много по-интересно, когато я използвате вляво от оператора за присвояване:

$ firstVar = "0123BBB789";
substr ($ firstVar, 4, 3) = "AAA";
print ("firstVar = $ firstVar \ n");

Пример: Намиране на низ

Друг интересен проблем, който можете да разрешите с низови функции, е намирането на даден подниз в низ. Например имате пълно квалифицирано име на файл, включително пътя: "C: \\ WINDOWS \\ TEMP \\ WSREWE.DAT", но трябва само да получите името на файла от него. Можете да направите това, като намерите последната наклонена черта (символ '\') и след това използвате функцията substr ().

Не забравяйте, че трябва да използвате двойния знак '\\' в низ, за ​​да посочите символа '\'. Ако сте забравили материала, вижте глава 2 „Цифрови и струнни литерали“.

---