Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"

Re: split help

by thinker (Parson)
on Sep 22, 2003 at 17:36 UTC ( #293206=note: print w/ replies, xml ) Need Help??

in reply to split help

Hi AM,

This should do what you want. See perldoc -f split

#!/usr/bin/perl use strict; use warnings FATAL => 'all'; my $str = "DATETIME 09:59:11"; my $time = (split " ", $str)[1]; my ($h,$m,$s) = split ':', $time; print $h;

Hope this helps


Update Answered the question that was asked, not the one I imagined :-)

Comment on Re: split help
Download Code
Replies are listed 'Best First'.
Re: Re: split help
by matthewb (Deacon) on Sep 23, 2003 at 15:32 UTC
    Somewhat daft but I notice that no one has mentioned the third argument to split yet:

    use strict; use warnings FATAL => 'all'; # ;) my( $one, $two ) = split /:/, q[DATETIME 09:59:11], 2; print substr( $one, -2 );

    From perldoc -f split:
    If LIMIT is specified and positive, it represents the maximum number of fields the EXPR will be split into, though the actual number of fields returned depends on the number of times PATTERN matches within EXPR.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://293206]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (2)
As of 2015-10-04 22:39 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (105 votes), past polls