A hands-on prayer readiness book for young children. Filled with games and craft activities. My Siddur invites children to make their own prayer book. Easy steps introduce students to:
- Important Hebrew prayer vocabulary
- The Shema
- The basic formula for the brachot
- The principal parts of the synagogue service
Students will enjoy cutting out and practicing with their own Hebrew word cards.
#!/usr/local/bin/perl
$FNAME=$ENV{DOCUMENT_ROOT}. "/dbase/products.txt";
#$FNAME="products.txt";
&behrfun($ARGV[0]);
sub behrfun{
my $sku=shift;
print "Content-type: text/html\n\n";
$m=&findme($sku);
unless($m->{'price'}){
&errprint;
}
}
if($m->{salep}){
printsale($m->{itemno},$m->{sku},$m->{price},$m->{salep});
}else{
printresult($m->{itemno},$m->{sku},$m->{price},$m->{salep});
}
sub errprint{
print "[Error: Price not found]\n";
}
sub findme{
my $sku=shift;
my $f;
my @j;
open (FHAN,"<$FNAME") or print "can't open file";
$k=;
# @j=split(/\t/,$k);
# foreach $i (0..30){
# print "$i: $j[$i]\n";
# }
while(){
@j=split(/\t/);
if($j[15] eq $sku){
$f= {
'itemno' => $. - 2,
'price' => $j[1],
'salep' => $j[2],
'sku' => $j[15]
};
close(FHAN);
return $f;
}
}
close(FHAN);
}
sub printresult{
my($itemnum,$sku,$price,$saleprice)=@_;
print<\$$price
![[ORDER THIS]](http://www.behrmanhouse.com/img/order.gif)
($sku)
BLAH
}
sub printsale{
my($itemnum,$sku,$price,$saleprice)=@_;
print<\$$price
On Sale! \$$saleprice
($sku)
BLAH
}
|
![[cover]](../covers/mysiddur200x262.jpg)
