#!/usr/bin/perl -l use strict; use warnings; use Inline C => <<'END_C'; void foo( SV *sv ) { if( sv ) { printf( "%s\n", SvPV_nolen( sv ) ); return; } } void bar( SV *sv ) { printf( "%i\n", SvPOK( sv ) ); } END_C foo('asdf'); foo(1); bar(0);
In reply to Re: SvPV Segmentation Fault
by Khen1950fx
in thread SvPV Segmentation Fault
by adler187
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |