想写入数据，却得到 Mojolicious::Controller=HASH(0xa450118)

david_95

用mojolicious 写了个程序，用户页面输入数据，post 到后台，写入一个文件。

NewStoreRecords ="{store_gl_code:"14",store_gl_desc:"gl_book",store_name1:"23342423",store_node_id:"2222",store_root_node_id_code:"23",}";

post '/postStore' => sub {
    my $self = shift;
    $self->render('text' => $self->param("NewStoreRecords");
    $self->saveIonFile($self->param('NewStoreRecords'));
};

render 到页面是很正常的，但是打开保存的文件只有 “Mojolicious::Controller=HASH(0xa8184a”
求大神指教。 我依稀记得看过一个帖子也是遇到这问题，但现在死活找不到了

david_95

原因找到了！ 我写入的字符串，因为 带 ｛｝，所以perl 把它们当成hash 了，我怎么让perl 把它当字符串？

david_95

哦，不是，我即使是输入  $self->saveIonFile("aaa_bbb_ccc_ddd");
它也是把它当hash,

helper saveIonFile => sub {
    my $recs_str = shift;  # parameter: ion string to upload
    app->log->debug("input param is:".$recs_str);
    my $ION_DIR  = app->home->rel_file('/workdata');  # create dir to store iondata
    unless (-d $ION_DIR) {
        mkpath $ION_DIR or die "Cannot create dirctory: $ION_DIR";
    }
    app->log->debug("write file to".$ION_DIR."/prog_store.ion");
    my $localdata = $ION_DIR."/prog_store.ion";
    open IONFile,">",$localdata;
    print IONFile $recs_str;
    close IONFile;
};

原来 helper function  的 shift 总是 Mojolicious::Controller

虽然没人回答问题，我就自己研究，把结果贴在这里，以便给后人留点帮助。

david_95

搞定， helper 的参数都是Mojolicious::Controller ，所以直接调用param