#!/usr/bin/perl

use Camila::caller;
use Camila;

undef $/;

$text = <>;

Camila::caller::parse_string($text);