Use glob. But make sure the input doesn't contain *, ?, and {}.

#!/usr/bin/perl
use warnings;
use strict;
use feature qw{ say };

sub parse_args {
    my ($input) = @_;
    return [glob $input]
}

use Test::More tests => 1;

is_deeply parse_args('23 45.67 "John Marcus" Surname'),
    [23, 45.67, 'John Marcus', 'Surname'];
[download]