Forum Webscript.Ru

Программирование => Perl => Тема начата: Slick от 09 Марта 2002, 02:25:52

Название: Преобразовать скаляр в массив, но нет разделителей.
Отправлено: Slick от 09 Марта 2002, 02:25:52

Вопрос:
Как скаляр вида $as ="987" преобразовать в массив @sa вида $sa[0]="9" $sa[1]="8" ?

Название: Преобразовать скаляр в массив, но нет разделителей.
Отправлено: Oak от 09 Марта 2002, 13:23:22

$i=0;
while($as =~ m/(.)(.*)/) {$as=$2;$sa[$i]=$1;$i++;}


tak ili naoborot vrode...

Название: Преобразовать скаляр в массив, но нет разделителей.
Отправлено: Боря Елкин от 09 Марта 2002, 13:50:53

$as=987;
@sa=split //,$as;

Название: ;)
Отправлено: Oak от 09 Марта 2002, 14:04:06

ну не знаю я Perla...

Название: Преобразовать скаляр в массив, но нет разделителей.
Отправлено: Slick от 10 Марта 2002, 00:17:10

Спасибо, зделал уже, хотя и по другому:

#!/usr/bin/perl

my $date ="20020309050518";
$new_date = substr($date, 6,2) . \'.\' . substr($date, 4,2) . \'.\' . substr($date, 0,4);
print $new_date;
#09.03.2002