Got it to work with a couple changes. Needed to Dim variables and use CStr function. Thanks for the help!

Sub pushbutton()
    Dim arg String
    Dim cmd String

    arg = CStr(Range("A1").Value)
    cmd = "cmd /k perl -le ""print @ARGV"" " & arg
    Call Shell(cmd)
End Sub
[download]