Getting rid of the first 0 digit when counting

[perlnewbie9292]

Hello everyone,

I am pretty new to Perl and hoping someone can please point me in the right direction. I am trying to do stuff based on timestamp from the hour field.

I am doing something like this:

if ( $hour = 2..9 )
{
    DOING STUFF HERE
}

If there anyway to either only show single digits for hours 00-09 or when running a range to be able to specify or be count ignoring the first 0 in the 00..09. Not sure if that make sense to everyone .

So what I am trying to do is:
$hour = 2..9 instead of this:
$hour = 02..09

I guess I could do a substitution to get rid of the first 0 if it starts with a 0 digit but hoping there is cleaner/better way to do this.

I am using my $hourOfTheDay = strftime( '%H', localtime );
to get the hour digits.

Thanks for the help in advance.

 

[perlnewbie9292]

Sorry used the wrong example meant:

if ( $hour = 2..12 )
{
    DOING STUFF HERE
}

 

[Annihilannic]

Try $hourOfTheDay = strftime( '%1H', localtime );.

Annihilannic.

 

[prex1]

Not sure to understand what you want to do with
[tt]if ( $hour = 2..12 )[/tt]
perhaps this
[tt]if($hour>=2 && $hour<=12)[/tt]
and it doesn't matter if [tt]$hour[/tt] had a trailing 0, perl correctly interprets it as a number in numerical operations and comparisons.

Franco

http://www.xcalcs.com

: Online engineering calculations

http://www.megamag.it

: Magnetic brakes for fun rides

http://www.levitans.com

: Air bearing pads

 

[terryISO]

You can also do this to remove the leading zero:

$hour=(1*$hour);

But as prex1 says, why bother?