regular expression help

Hi, I have a string like:
64.52.26.230:6355,103359,26905,97.28

I want to cut this down to:
64.52.26.230:6355

Basically I want to take all characters up to the first comma and assign this new string to a variable called $server. Can anyone tell me how to do this?

[This message has been edited by scream (edited August 25, 2000).]

<BLOCKQUOTE><font size="1" face="Verdana,Arial,Helvetica">code:</font><HR><pre>
$var =~ /^([^,]+)/;
$server = $1;
[/code]

I have been working on this regular expression and come up with this:


$server = "64.52.26.230:6355,103359,26905,97.28";
if ($server =~ /.*?,/) {
print "worksn";
}


I guess my regex is /.*?,/ which matches everything up to the first comma. How do I take this regex and make it assign everything up the the first comma to a variable?

Thanks, I ended up with

<BLOCKQUOTE><font size="1" face="Verdana,Arial,Helvetica">code:</font><HR><pre>
$var = "64.52.26.230:6355,103359,26905,97.28";
$var =~ /^([^,]+)/;
$server = $1;
print "$servern";
[/code]