Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: Comapring two values of a scalar

by igelkott (Priest)
on Apr 13, 2013 at 12:24 UTC ( [id://1028513] : note . print w/replies, xml ) Need Help??

in reply to Comapring two values of a scalar

Looks like you tried to write \[31:15\] rather than use code tags. See Markup in the Monastery for help with posting questions.

Taking a bit of a guess but you probably have something like $array[0]= "31:15";. If so, just split on the ":" and do the subtraction. This should be simply enough for a beginner (sorry for the assumption) but if it gets confusing, try the same thing on a simple variable (scalar) like $foo= "31:15";.

Replies are listed 'Best First'.
Re^2: Comapring two values of a scalar
by BillKSmith (Monsignor) on Apr 13, 2013 at 17:47 UTC

    Uner the same assumption, I prefer a regular expression. The Common module will match any valid number. The /e option will do the subtraction. The /r option returns the result without modifying the original string.

    use strict; use warnings; use Regexp::Common; my $NUMBER = qr/$RE{num}{real}/; my @array = ('31:15'); print $array[0] =~ s/($NUMBER):($NUMBER)/$1-$2/er;

      While nice and general, this seems a bit heavy for the OP, especially considering the the rather regular examples given. Of course, always nice to see an example of a more general/powerful solution.