use Inline "C"; print is_alpha("foo"); __END__ __C__ int is_alpha( char * str ) { while ( *str != '\0' ) { if ( ((*str >= 97) && (*str <=122)) || ((*str >= 65) && (*str <=90)) ) return 1; str++; } return 0; }