$from =~ s/-/,/g; 
$to =~ s/-/,/g;

@start = eval ($from);
@stop = eval ($to);