Lines Matching refs:default
140 when connecting to this server. You should specify the default
154 $default{smtp} = "'$smtp'";
171 $default{from}=<STDIN>;
172 for ($default{from}) {
176 delete $default{from} unless $default{from};
180 $default{replyto}=<STDIN>;
181 for ($default{replyto}) {
185 delete $default{replyto} unless $default{replyto};
189 $default{cc}=<STDIN>;
190 for ($default{cc}) {
194 delete $default{cc} unless $default{cc};
198 $default{bcc}=<STDIN>;
199 for ($default{bcc}) {
203 delete $default{bcc} unless $default{bcc};
207 $default{client}=<STDIN>;
208 chomp $default{client};delete $default{client} unless $default{client};
212 $default{headers}=<STDIN>;
213 chomp $default{headers};delete $default{headers} unless $default{headers};
219 /^q$/i and $default{encoding} = "'Quoted-printable'" and last;
220 /^b$/i and $default{encoding} = "'Base64'" and last;
226 $default{charset}=<STDIN>;
227 chomp $default{charset};
228 unless ($default{charset}) {
229 delete $default{charset}
231 $default{charset} =~ /^[\w\d_-]+$/ and $default{charset} = "'$default{charset}'";
243 print "%default = (\n";
245 foreach (keys %default) {
246 print "\t$_ => $default{$_},\n";