#!/usr/bin/perl # $Header: /cys/people/brenner/http/docs/web/RCS/combined-form.cgi,v 1.4 1996/03/29 22:59:29 brenner Exp $ # Copyright (C) 1994 Steven E. Brenner # This is a small demonstration script to demonstrate the use of # the cgi-lib.pl library, where the script both creates the form and # processes its input require "cgi-lib.pl"; MAIN: { # Read in all the variables set by the form if (&ReadParse(*input)) { &ProcessForm; } else { &PrintForm; } } sub ProcessForm { # Print the header print &PrintHeader; # Do some processing, and print some output ($text = $input{'text'}) =~ s/\n/\n
/g; # add
's after carriage returns # to multline input, since HTML does not # preserve line breaks if (length($input{'F01'})<1) {($input{'F01'}="Z");} if (length($input{'F02'})<1) {($input{'F02'}="Z");} if (length($input{'M01'})<1) {($input{'M01'}="Z");} if (length($input{'M02'})<1) {($input{'M02'}="Z");} if (length($input{'M03'})<1) {($input{'M03'}="Z");} if (length($input{'M04'})<1) {($input{'M04'}="Z");} if (length($input{'M05'})<1) {($input{'M05'}="Z");} if (length($input{'M06'})<1) {($input{'M06'}="Z");} if (length($input{'M07'})<1) {($input{'M07'}="Z");} if (length($input{'M08'})<1) {($input{'M08'}="Z");} if (length($input{'M09'})<1) {($input{'M09'}="Z");} if (length($input{'M10'})<1) {($input{'M10'}="Z");} if (length($input{'T01'})<1) {($input{'T01'}="Z");} if (length($input{'T02'})<1) {($input{'T02'}="Z");} if (length($input{'T03'})<1) {($input{'T03'}="Z");} if (length($input{'T04'})<1) {($input{'T04'}="Z");} if (length($input{'T05'})<1) {($input{'T05'}="Z");} if (length($input{'T06'})<1) {($input{'T06'}="Z");} if (length($input{'T07'})<1) {($input{'T07'}="Z");} if (length($input{'T08'})<1) {($input{'T08'}="Z");} if (length($input{'T09'})<1) {($input{'T09'}="Z");} if (length($input{'T10'})<1) {($input{'T10'}="Z");} if (length($input{'T11'})<1) {($input{'T11'}="Z");} if (length($input{'T12'})<1) {($input{'T12'}="Z");} if (length($input{'T13'})<1) {($input{'T13'}="Z");} if (length($input{'T14'})<1) {($input{'T14'}="Z");} if (length($input{'T15'})<1) {($input{'T15'}="Z");} if (length($input{'T16'})<1) {($input{'T16'}="Z");} if (length($input{'T17'})<1) {($input{'T17'}="Z");} if (length($input{'T18'})<1) {($input{'T18'}="Z");} if (length($input{'T19'})<1) {($input{'T19'}="Z");} if (length($input{'T20'})<1) {($input{'T20'}="Z");} if (length($input{'T21'})<1) {($input{'T21'}="Z");} if (length($input{'T22'})<1) {($input{'T22'}="Z");} if (length($input{'T23'})<1) {($input{'T23'}="Z");} if (length($input{'T24'})<1) {($input{'T24'}="Z");} if (length($input{'T25'})<1) {($input{'T25'}="Z");} if (length($input{'T26'})<1) {($input{'T26'}="Z");} if (length($input{'T27'})<1) {($input{'T27'}="Z");} if (length($input{'T28'})<1) {($input{'T28'}="Z");} if (length($input{'T29'})<1) {($input{'T29'}="Z");} if (length($input{'T30'})<1) {($input{'T30'}="Z");} if (length($input{'T31'})<1) {($input{'T31'}="Z");} if (length($input{'T32'})<1) {($input{'T32'}="Z");} if (length($input{'T33'})<1) {($input{'T33'}="Z");} if (length($input{'T34'})<1) {($input{'T34'}="Z");} if (length($input{'T35'})<1) {($input{'T35'}="Z");} if (length($input{'T36'})<1) {($input{'T36'}="Z");} if (length($input{'T37'})<1) {($input{'T37'}="Z");} if (length($input{'T38'})<1) {($input{'T38'}="Z");} if (length($input{'T39'})<1) {($input{'T39'}="Z");} if (length($input{'T40'})<1) {($input{'T40'}="Z");} if (length($input{'T41'})<1) {($input{'T41'}="Z");} if (length($input{'T42'})<1) {($input{'T42'}="Z");} if (length($input{'T43'})<1) {($input{'T43'}="Z");} if (length($input{'T44'})<1) {($input{'T44'}="Z");} if (length($input{'T45'})<1) {($input{'T45'}="Z");} if (length($input{'T46'})<1) {($input{'T46'}="Z");} if (length($input{'T47'})<1) {($input{'T47'}="Z");} if (length($input{'T48'})<1) {($input{'T48'}="Z");} if (length($input{'T49'})<1) {($input{'T49'}="Z");} if (length($input{'T50'})<1) {($input{'T50'}="Z");} if (length($input{'T51'})<1) {($input{'T51'}="Z");} if (length($input{'T52'})<1) {($input{'T52'}="Z");} if (length($input{'T53'})<1) {($input{'T53'}="Z");} if (length($input{'T54'})<1) {($input{'T54'}="Z");} if (length($input{'T55'})<1) {($input{'T55'}="Z");} if (length($input{'T56'})<1) {($input{'T56'}="Z");} if (length($input{'T57'})<1) {($input{'T57'}="Z");} if (length($input{'T58'})<1) {($input{'T58'}="Z");} if (length($input{'T59'})<1) {($input{'T59'}="Z");} if (length($input{'T60'})<1) {($input{'T60'}="Z");} if (length($input{'C01'})<1) {($input{'C01'}="Z");} if (length($input{'C02'})<1) {($input{'C02'}="Z");} if (length($input{'C03'})<1) {($input{'C03'}="Z");} if (length($input{'C04'})<1) {($input{'C04'}="Z");} if (length($input{'C05'})<1) {($input{'C05'}="Z");} if (length($input{'C06'})<1) {($input{'C06'}="Z");} if (length($input{'C07'})<1) {($input{'C07'}="Z");} if (length($input{'C08'})<1) {($input{'C08'}="Z");} if (length($input{'C09'})<1) {($input{'C09'}="Z");} if (length($input{'C10'})<1) {($input{'C10'}="Z");} if (length($input{'C11'})<1) {($input{'C11'}="Z");} open (COMMENTSFILE,">>polres1"); print COMMENTSFILE "$input{'F01'}\n"; print COMMENTSFILE "$input{'F02'}\n"; print COMMENTSFILE "$input{'M01'} "; print COMMENTSFILE "$input{'M02'} "; print COMMENTSFILE "$input{'M03'} "; print COMMENTSFILE "$input{'M04'} "; print COMMENTSFILE "$input{'M05'} "; print COMMENTSFILE "$input{'M06'} "; print COMMENTSFILE "$input{'M07'} "; print COMMENTSFILE "$input{'M08'} "; print COMMENTSFILE "$input{'M09'} "; print COMMENTSFILE "$input{'M10'} "; print COMMENTSFILE "$input{'T01'} "; print COMMENTSFILE "$input{'T02'} "; print COMMENTSFILE "$input{'T03'} "; print COMMENTSFILE "$input{'T04'} "; print COMMENTSFILE "$input{'T05'} "; print COMMENTSFILE "$input{'T06'} "; print COMMENTSFILE "$input{'T07'} "; print COMMENTSFILE "$input{'T08'} "; print COMMENTSFILE "$input{'T09'} "; print COMMENTSFILE "$input{'T10'} "; print COMMENTSFILE "$input{'T11'} "; print COMMENTSFILE "$input{'T12'} "; print COMMENTSFILE "$input{'T13'} "; print COMMENTSFILE "$input{'T14'} "; print COMMENTSFILE "$input{'T15'} "; print COMMENTSFILE "$input{'T16'} "; print COMMENTSFILE "$input{'T17'} "; print COMMENTSFILE "$input{'T18'} "; print COMMENTSFILE "$input{'T19'} "; print COMMENTSFILE "$input{'T20'} "; print COMMENTSFILE "$input{'T21'} "; print COMMENTSFILE "$input{'T22'} "; print COMMENTSFILE "$input{'T23'} "; print COMMENTSFILE "$input{'T24'} "; print COMMENTSFILE "$input{'T25'} "; print COMMENTSFILE "$input{'T26'} "; print COMMENTSFILE "$input{'T27'} "; print COMMENTSFILE "$input{'T28'} "; print COMMENTSFILE "$input{'T29'} "; print COMMENTSFILE "$input{'T30'} "; print COMMENTSFILE "$input{'T31'} "; print COMMENTSFILE "$input{'T32'} "; print COMMENTSFILE "$input{'T33'} "; print COMMENTSFILE "$input{'T34'} "; print COMMENTSFILE "$input{'T35'} "; print COMMENTSFILE "$input{'T36'} "; print COMMENTSFILE "$input{'T37'} "; print COMMENTSFILE "$input{'T38'} "; print COMMENTSFILE "$input{'T39'} "; print COMMENTSFILE "$input{'T40'} "; print COMMENTSFILE "$input{'T41'} "; print COMMENTSFILE "$input{'T42'} "; print COMMENTSFILE "$input{'T43'} "; print COMMENTSFILE "$input{'T44'} "; print COMMENTSFILE "$input{'T45'} "; print COMMENTSFILE "$input{'T46'} "; print COMMENTSFILE "$input{'T47'} "; print COMMENTSFILE "$input{'T48'} "; print COMMENTSFILE "$input{'T49'} "; print COMMENTSFILE "$input{'T50'} "; print COMMENTSFILE "$input{'T51'} "; print COMMENTSFILE "$input{'T52'} "; print COMMENTSFILE "$input{'T53'} "; print COMMENTSFILE "$input{'T54'} "; print COMMENTSFILE "$input{'T55'} "; print COMMENTSFILE "$input{'T56'} "; print COMMENTSFILE "$input{'T57'} "; print COMMENTSFILE "$input{'T58'} "; print COMMENTSFILE "$input{'T59'} "; print COMMENTSFILE "$input{'T60'} "; print COMMENTSFILE "$input{'C01'} "; print COMMENTSFILE "$input{'C02'} "; print COMMENTSFILE "$input{'C03'} "; print COMMENTSFILE "$input{'C04'} "; print COMMENTSFILE "$input{'C05'} "; print COMMENTSFILE "$input{'C06'} "; print COMMENTSFILE "$input{'C07'} "; print COMMENTSFILE "$input{'C08'} "; print COMMENTSFILE "$input{'C09'} "; print COMMENTSFILE "$input{'C10'} "; print COMMENTSFILE "$input{'C11'}\n"; close COMMENTSFILE; print < Thanks!



Thanks for completing the survey!

Comments? Send them to us.



ENDOFTEXT # Close the document cleanly. print &HtmlBot; } sub PrintForm { print &PrintHeader; # Print out the body of the form from a single quoted here-document # Note that if ENDOFTEXT weren't surrounded by single quotes, # it would be necessary to be more careful with the other text # For example, the @ sign (in the address) would need to be escaped as \@ print <<'ENDOFTEXT'; Who In Government Has Power Over What?

Survey: Who In Government Has Power Over What?

Prof. Bryan Caplan
Department of Economics,
Center for Study of Public Choice,
and Mercatus Center
George Mason University

Prof. Ilya Somin
School of Law
George Mason University




In the United States, there are several different branches of the federal government, including the president, Congress, the Supreme Court, and various government agencies. There are also state and local governments. Some of these branches and levels of government may have more power than others. Others may have a lot of power over some issues, but little power over others. I am going to ask you some questions about how powerful you think the different branches and levels of the government are.

Part 1

1. Which part of the government has the most power over how well the economy does during the next two years?

2. Which part of the government has the most power over whether we are at peace or war?


Part 2

1. Currently, which level of government has the most power over education policy?
A. Federal.
B. State and local.
C. Both of the above equally.
D. Don't know.

2. Currently, which level of government has the most power to combat crime?
A. Federal.
B. State and local.
C. Both of the above equally.
D. Don't know.

3. Who selects federal judges?
A. The president alone.
B. The president, subject to confirmation by the Senate.
C. The Senate.
D. The House of Representatives.
E. Don't know.

4. Which part of the federal government has the most power over monetary policy?
A. The president.
B. Congress.
C. The Federal Reserve Board.
D. The Treasury Department.
E. Don't know.

5. Which part of the federal government has the most power to determine American military strategy in a war?
A. The president.
B. Congress.
C. The Supreme Court.
D. The President and Congress equally.
E. Don't know.

6. Which part of the federal government has the power to strike down laws if it concludes that they violate the Constitution?
A. The courts.
B. Congress.
C. The president.
D. All three of the above.
E. Don't know.

7. Which branch of the federal government has the most power to decide how federal tax money is spent?
A. The courts.
B. Congress.
C. The president.
D. The president and Congress equally.
E. Don't know.

8. Which level of government has the most power to establish the rules for elections?
A. Federal
B. State
C. Federal and state governments equally.
D. Don't know.

9. Who selects members of the Cabinet, such as the Secretary of State and Secretary of the Treasury?
A. The president alone.
B. The president, subject to confirmation by the Senate.
C. The Senate.
D. The House of Representatives.
E. Don't know.

10. Currently, which level of government has the most power to deal with natural disasters?
A. Federal.
B. State and local.
C. Both of the above equally.
D. Don't know.


Part 3

Please complete the table below.

On a scale of 0-10, with 0 meaning "no power at all," and 10 meaning "complete power," how much power do you think each of these parts of the government has over the following outcomes?

PARTS OF THE GOVERNMENT
President Congress Supreme Court Federal Reserve Department
of Defense
Environmental
Protection Agency
OUTCOMES How well the economy does during the next two years
How well the economy will be doing twenty years from now
How much the federal government spends
The degree of income inequality
How long the average person in the United States lives
Whether we are at peace or war
The success of the War on Terrorism
Crime rates
The overall quality of the environment



Part 4

Does {the president, Congress, the Supreme Court, the Federal Reserve, the Department of Defense, the Environmental Protection Agency} have more power to improve conditions or make them worse? Or would you say it's about the same?

1. Does the president have more power to improve conditions or make them worse? Or would you say it's about the same?
A. More power to improve conditions.
B. More power to make them worse.
C. About the same.

2. Does Congress have more power to improve conditions or make them worse? Or would you say it's about the same?
A. More power to improve conditions.
B. More power to make them worse.
C. About the same.

3. Does the Supreme Court have more power to improve conditions or make them worse? Or would you say it's about the same?
A. More power to improve conditions.
B. More power to make them worse.
C. About the same.

4. Does the Federal Reserve have more power to improve conditions or make them worse? Or would you say it's about the same?
A. More power to improve conditions.
B. More power to make them worse.
C. About the same.

5. Does the Department of Defense have more power to improve conditions or make them worse? Or would you say it's about the same?
A. More power to improve conditions.
B. More power to make them worse.
C. About the same.

6. Does the Environmental Protection Agency have more power to improve conditions or make them worse? Or would you say it's about the same?
A. More power to improve conditions.
B. More power to make them worse.
C. About the same.


Part 5

1. What is your race? Are you white, black or African-American, Asian-American or some other race?
White
Black
Asian
Other

2. What is your sex?
Male
Female

3. What is your age?


4. In politics today, do you consider yourself a...?
Republican
Democrat
Independent
Other

5. Would you say that your views in most political matters are...?
Very liberal
Liberal
Moderate
Conservative
Very conservative
Other

6. How concerned are you that you or someone else in your household will lose their job in the next year?
Very concerned
Somewhat concerned
Not too concerned
Not concerned at all

7. During the past five years, do you think that your family's income has been going up faster than the cost of living, staying about even with the cost of living, or falling behind the cost of living?
Falling behind
Staying about even
Going up

8. Over the next five years, do you expect your family's income to grow faster or slower than the cost of living, or do you think it will grow at about the same pace?
Slower
About the same
Faster

9. If you added together the yearly incomes, before taxes, of all the members of your household for the last year, 2005, would the total be...?
Less than $15,000
$15,000-$29,999
$30,000-$39,999
$40,000-$49,999
$50,000-$64,999
$65,000-$79,999
$80,000-$99,999
$100,000-$149,999
$150,000 or more

10. What is the last grade or class that you COMPLETED in school?
High school incomplete
High school graduate (grade 12 or GED certificate)
Business, technical, or vocational school AFTER high school
Some college, no 4-year degree
College graduate (B.S., B.A., or other 4-year degree)
Post-graduate training or professional schooling after college (e.g. towards a master's degree or Ph.D.; law or medical school)

11. Are you a political scientist?
No
Yes - undergraduate major in political science
Yes - some graduate training in political science
Yes - Ph.D. in political science

ENDOFTEXT print &HtmlBot; }