@main[]

$o[^O::create[]]
object: ^show[$o]
class: ^show[$O:CLASS]

^process{@CLASS
P

^@create[]
}[ $.file[process.p] ]

$p[^P::create[]]
process object: ^show[$p]
process class: ^show[$P:CLASS]

^process{@CLASS
P2

^@create[]
}
process without file specified: ^show[$P2:CLASS]

parser method: "^show[$show]"
native method: "^show[$string:length]"
code: ^try-catch{
    $v[^reflection:filename{code}]
}

@show[o]
$v[^reflection:filename[$o]]
$result[^v.match[^^.+/][]{/-real-path-was-here-/}]

@CLASS
O

@create[]