insetion Bytea atrr error!

hi,
I want to add jpg file a attr pic that it's type is Bytea in Perl script;
I do following commands:

$name='mehdi';
$filename="sh.gif";
open(inp, "$filename") ;
my $INP = join '', <inp>;
close inp;

$result=$conn->exec("insert into tablename values ($name,$inp)");

but it return error code 7 (PGRES_FATAL_ERROR);
how can I resolve this problem?
Would u help me please?

Mehdi Jabalameli
jabalameli(at)ce(dot)sharif(dot)edu
ce.sharif.edu/~jabalameli