($Time, $Uptime, $Current_Users,$CPU_Load) = '10:03pm up 3 days, 9:27, 1 user, load average: 0.00, 0.00, 0.00' =~ /^(.+?m) (up .+? days?, .+?:.+?), (.+? users?), (load average: .*?)$/; print '[', $Time, '] [', $Uptime, '] [', $Current_Users, '] [', $CPU_Load, ']'; # Ouput [10:03pm] [up 3 days, 9:27] [1 user] [load average: 0.00, 0.00, 0.00]