hmmmm prawie... regex zlapie np "zupa 123456" i jak to teraz ma dodac i zaokraglic do 2 po przecinku?
raczej cos w ten sposob:
Kod:
$a =~ /(\d+(\.\d+)?)\s+(\d+(\.\d+)?)/;
a teraz tlumaczac na nasze...
- jedna lub wiecej cyfr
- zero lub jeden ciag ".cyfry"
- to co znalezione zapamietaj w zmiennej
- jeden lub wiecej znakow bialych (spacja, tabulacja)
- to samo dopasowaine co na poczatku
dla upartego mozna jeszcze dodac ^ i $ aby zaznaczyc twardo poczatek i koniec linii ale wtedy regex nie zadziala jesli ktos przypadkiem walnie spacje albo jakas litere na poczatku linii :P
Na upartego mozna regex zmienic na:
Kod:
$a =~ /(\d+(\.\d+)?)\D+(\d+(\.\d+)?)/;
a wtedy z tekstu "sadk4.53a c2sa" powinien wyciagnac 4.53 i 2 ignorujac reszte Perl power!